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INTRODUCTION 


The Transaction Distribution System (TDS) provides the Computer Management System (CMS) user with 
an interface with a data communications network. The TDS generally meets user requirements without being 
modified. The terminal descriptions and line configurations provided in TDS, along with the dynamic assign- 
ment of stations to lines, are flexible enough to meet many user defined networks. Although certain limitations 
have been imposed, they are not intended to affect the application programmer, but represent proper and de- 
sired design constraints for simplicity, speed, and intelligibility. 


This manual contains a description of the functional structure of TDS and gives a detailed explanation 
of the operating requirements and procedures for the transaction distribution system. 


The information contained in this manual reflects the implementation of TDS as of the 3.1 release. 


SECTION 1 
SYSTEM DESCRIPTION 


GENERAL 


The transaction distribution system (TDS) provides the computer management system (CMS) user with 
a data communications interface that can be implemented with a minimum of user effort. TDS permits the 
user to configure the required network (via the NDLSYS file) and then allocate the network resources 
dynamically during the execution of the transaction message control system program (TMCS). There are three 
major interfaces with TDS: 


{. The terminal user. 
2. The system operator. ' 
3. Application programs. 


ENVIRONMENT 


‘The following firmware/software is required to execute TDS on a CMS system: 
1. The CMS MCP. 
2. TMCS and the MPLII interpreter. . 
\3. The appropriate NDLSYS file and the NDLDCP interpreter file (unless non-interpretive NDL is 
used. 
4. Any user-defined tasks or CMS data comm application programs and their respective interpreters. 


TDS is comprised of two program modules: the transaction message control system program (TMCS) 


HT Oe ren 


and the transaction network definition language NDLSYS file (TNDL). The functions performed by TMCS 
are as listed in the following subparagraphs. 


Network Initialization 

This allows the site network to be entered via the TMCS command language statements, using the 
TNDL model network. 
Network Reconfiguration 

The dynamic adding/deleting of declared stations is done via the TMCS command language statements. 
Network Error Handling 

Network failure reporting and logging is performed by TMCS. 
Job Initiation 

This is used for terminal job initiation, one-one and many-one binding of terminal(s) to task. 
Job Termination (Requests) 

These requests are sent from terminal to TMCS to task or from SPO to TMCS to task. 


Data Comm File Handling 


_ File handling is done via open-attach or close-detach (if last terminal detaches, discontinuation of task 
is by convention). 


SPO Command Handling for Data Comm Functions 


These commands consist of task BOJ/EOJ messages, network alerts (dialin, errors), and SPO-entered 
TDS commands and responses. 


The initialization and reconfiguration of the network in use by TMCS are implemented by the MPLII 
language constructs of REDEFINE.LINE and REDEFINE.STATION. As a result, they must meet the re- 
quirements established for the execution of those statements (the line and stations on it must not be in use 
at the time of the reconfiguration). If the requirements for reconfiguration are not met, an error is reported. 


For a detailed description of the commands defined for TDS, refer to Section 3 of this manual. 


The NDL file for TDS handles the actual system interface with the data comm network. The current 
release (level 3.1) has three line control procedures defined. 


All three disciplines are available in non-interpretive form. By default, stations are defined as being 
poll/select terminals. Using the TDS RS (redefine station) command, a station may be defined as multipoint 
contention « or ‘terminal poll/select (in which the CMS processor acts as a terminal to that station). The attribute 
to be changed in the station definition is the logical terminal number. Table 1-1 lists the logical terminal num- 


bers and the associated terminal reference. 
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Terminal Reference 
1 Poll/select - TD 730s 


Multipoint contention — TD 730s 

3 Poll/select — TD 800s 

4 Multipoint contention —- TD 800s 

> Terminal poll/select 

6 Poll/select — TD 830s 

7 Multipoint contention — TD 830s 

8 Poll/select - TC 4000s and TC 5000s 
9 Mult yon contention — TC 4000s and TC 5000s m4 
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The logical structure of the model network for TDS is defined as having a unique file for each station 
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and nine general files where every station is a potential member. In addition, dummy stations are defined for 
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the MCS, the SPO, and for each of the mix numbers available for job execution. These are defined to permit 
the user to communicate with TMCS, the system SPO, and from one user job to another (via the mix number 
dummy stations). Refer to Appendix G for listings of the applicable sections of the TNDL source file. Figure 
1-1 shows the interaction of the various components of TDS and the interaction with other aspects of the user 


system. 


HARDWARE REQUIREMENTS 


The transaction distribution system requires the basic CMS hardware, but uses only a portion of the 
total system. The basic configuration consists of: 
. Main processor (minimum of 80KB of memory). 
. System SPO and control. 
. Disk cartridge drive and control. 
. Data comm preprocessor (with appropriate line adapters as needed). 
. Line printer. 
Real time clock. 
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Figure 1-1. TDS Interfaces 


SECTION 2 
FUNCTIONAL CONCEPTS 


GENERAL 


Since TDS is designed to be a transaction system, much flexibility has been incorporated into it. There- 
fore, certain restrictions and limitations have been included in the design of the TDS. This section identifies 
the restrictions and discusses the concepts utilized when considering an interface with TDS via a user program, 
terminal, or system SPO. 


TMCS INITIATION 


The first aspect of TDS which must be understood is the network configuration, how it is initiated, and 
how it can be altered. To initiate the execution of TMCS, the word TMCS is entered on the system SPO. 
This may be followed optionally by the TDS command DC CONF, or by a program name (restart/recovery,) 
to be understood by TMCS as an initiating message. The MCP performs the following operations in response 
to the request for TMCS execution: 

1. Loads the non-interpretive NDL file or the NDLDCP files from disk into the DCP. 

2. Loads the NDLSYS and DCC (data communications controller) files from disk into memory. 

3. Loads TMCS from disk and initiates its operation. 


TMCS first tests for an initiating message which is not a TDS command (this may be the name of a 
restart/recovery program). If found, TMCS performs a ZIP EX of the program and suspends itself until the 
program has successfully gone to EOJ. TMCS then tests for the existence of the model network information 
file (MODELNIF) and the SITENIF. Usually, neither is found initially, and TMCS proceeds as follows: 


1. Forms a MODELNIF disk file comprising variables which, when used with the redefine line and re- 
define station communicates, produce the model network. 

2. Lists the model configuration on the system line printer. 

3. Displays DC HARDWARE CONFIGURATION on the SPO. 

4. Accepts. input of form TD80ABC from the SPO, terminated by END, and forms a SITENIF disk 
file comprising variables which, when used with the redefine line and redefine station communicates, 
produce the site configuration. _ 

5. Displays START DIRECTORY BUILDER (DCY OR DGN) on the SPO. If DC Y is entered, displays 
BUILD NEW DIRECTORY? (Y OR N) on the SPO, accepts the response, and accepts site descrip- 
tions of the form: 


ee TEL PL!” 
(N) <phone-number> <terminal-entry> 


Where <site-name> is a 12-character alphanumeric entry; the optional (N) identifies a non-standard 
site (not poll-select); the <telephone-number> is an optional entry (one can be supplied in the DIA- 
LOUT command); and the <terminal-entry> is of the same format as those in the DC HARDWARE 
CONFIGURATION entries. Creation or modification of the phone directory takes place accordingly. 
These entries are terminated by DC END. 

6. Using the SITENIF variables as input, issues redefine line and redefine station communicates as re- 
quired to form the SITE network. 

7. Configures each switched line represented in the site phone directory to the TOTALSITE configura- 
tion for that line. 

8. Issues make-line-ready commands for all lines with at least one station attached. 

9. Displays the TMCS banner on the SPO, followed by any line-not-ready or station-not-ready results. 


If a MODELNIF exists, it is compared with the current NDLSYS file to verify that it is valid. If the 
MODELNIF is not valid, it is treated as being nonexistent. 
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If a valid MODELNIF ex: 


step 1 is omitted. 
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{TENIF exist, and DC CONF is included in the initiating message, 
> 1 is omitted and step 2 lists the SITE configuration instead of the 
{ODELNIF and SITENIF exist, and DC CONF is not included in 
{ through 4 as previously listed. See figure 2-1 for the flow of TMCS 
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Figure 2-1. TMCS Initiation/Restart 


2. Otherwise, TMCS simply queues a *TERMINATE message on the transaction queue of each active 
user data comm task indicating to the task the desire to close down the data comm subsystem. This 
is only a request. The user remains attached to its queue(s) and station(s) for both input and output 
until the task terminates. 

3. When all user data comm tasks have gone to EOJ, TMCS notifies the SPO and all ready terminals, 
via a shutdown message, that it is terminating. All information is saved for restart, lines are shut 
down, files are closed, and the task goes to EOJ. 


NOTE 
Once a TERM command is entered, no new activity may be initiated via the TDS 
AT, EX, PL, or RN commands. 


Restart of TMCS 


Whether TMCS was terminated in an orderly fashion via the TDS TERMinate command, or abruptly 
via the CMS DS or DP SCL command, or a CLEAR/START, it is possible (via the TMCS logs) to recover 
restart information. 


To begin the restart, include the word RESTART in the initiating message for TMCS. 


If the word RESTART ts included, TMCS ZIPs a CMS execute command to the MCP, which initiates 
the TDS restart program. TMCS remains suspended until the restart program has gone to EOJ. 


The minimum functions that the TDS restart program performs are: 


1. Interrogate the TMCS logs to determine whether TMCS was terminated in an orderly manner or ab- 
ruptly. 
2. List the data comm mix that existed prior to termination, including: 
a. <mix-no.> / <program-name> 
b. <logical-queue-no.> / <queue-name> of attached subnet queue. 
c. <logical-station-no.> / <station-name> of attached stations. 


TMCS maintains two separate log files: a control/error log and an event log. The TDS control log con- 
tains the following types of messages: 


1. All TDS commands (including those embedded in the initiating message). 
2. Attach/detach messages as well as the resulting allow/disallow communicates. 
3. Dialin alerts. 


The TDS error log contains the following types of messages: 


1. All error messages reported to TMCS. 
2. DC communicate errors. 
3. Non data comm errors. 


The TDS event log may be disabled by the TDS RO EVLOG command and enabled via the TDS SO 
EVLOG command. All message headers processed by TMCS are logged in the event log. 


COMMUNICATIONS WITH TMCS 


It is assumed that the TMCS is implemented with TNDL, which is the NDLSYS provided with the 
system. If another user-written NDLSYS is used, allowances must be made for interface with TMCS. 


Control Characters 


The control character, as defined in TNDL, is the asterisk (*). The asterisk, when entered as the first 
character of a message is recognized as preceding a message to be considered other than data for a user data 
comm task (a message to be handled by TMCS). The control character may be changed on a Station basis 
via the RS (redefine station) statement. 


SPO Communications With TMCS 


The prefix DC, when entered on the SPO, places the information following it on the MCS queue. If 
what follows the DC is not recognized as a TDS command, it is assumed to be one of the following: a pro- 
gram-name with an implied EX preceding it, a destination with an implied TO preceding it, or a limit or count 
with an implied ENQ preceding it. Refer to Section 3 for a discussion of command defaults. 


User Task Communications With TMCS 


A user data comm task may send a TDS command to TMCS by moving the dummy station name, MCS, 
to the symbolic destination field of the output CD and executing a send statement. After sending a TDS com- 
mand to TMCS, the user task should do one or more receives from its communicate queue (CQ). Receives 
Should be done until ENDKEY # 2. The first three bytes are always a fetch value. If byte 0 equals @O0@, 
the request was completed successfully. Otherwise, one of the following categories of fetch values (F.V.) ap- 
pears: : 


Byte 0 Byte 1 Byte 2 
TDS Syntax Error @301a <TDS Command #> <Error index> 
TDS Result Error @70@ @Wa@ <MSG. RSLT #> 
ZIP Error @I0GQ <TDS Command #> <Error index> 
DC Error Refer to CMS DC Subsystem Ref. Manual (no. 1090909) 
VO Error Refer to CMS MCP Ref. Manual (no. 2007555) 


If the message sent is not a recognizable TDS command, it is assumed to be a program name, a destina- 
tion, or a limit or count. Refer to Section 3 for a discussion of command defaults. 


Communications Using Session Number/User Data 


When sending a command to dummy station ‘‘MCS’’, a user task may include a tag which will be re- 
turned (or forwarded) along with all responses/notifications resulting from the command. 


The tag is passed in the SKIP field of the message header by executing a SEND (DC.SEND in MPLI)) 
AFTER/BEFORE ADVANCING <tag> LINE(S), where <tag> is a binary number (decimal in Cobol) from 
13 through 43. The tag will be returned (or forwarded) as displayable ASCII in the MONTH field of the MES- 
SAGE DATE in the input CD. Therefore, if a user task receives a message with a MONTH field value greater 
than 12 (3132 in HEX), it can be assumed that the value is a tag. 

NOTE 
If the TDS command associated with a user tag is a DT <queue-name>/, or a DT 
<queue-name>/MXn, the sending task will not actually be detached from the im- 
plied task, although all the appropriate responses/notifications will be returned/for- 
warded as if the detachment had actually taken taken place. (See “‘DT’’.) 


Station Name Conventions 


TNDL station names comprise a minimum of seven characters. The first six characters constitute a ter- 
minal mnemonic. The seventh character is a letter which, together with the terminal mnemonic, uniquely iden- 
tifies the station. 


When referencing a particular station, specify at least the first three characters and the seventh letter. 
For example, for a TD830XA, use either of the following: TD8A or TD830XA. 


Multiple stations with the same terminal mnemonic may be referenced by specifying at least the first 
three characters of the terminal mnemonic, followed by the seventh character of each station to be referenced 
(for TD830XA and TD830XB, use TD8AB). Multiple stations of any type may be referenced by specifying 
at least the first character of the terminal mnemonic followed by an equal sign. Refer to the list below for 
TD730XA, TD700XB, TC4000A, TD830XA, and B9347XA. 
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T= references TD730XA, TD700XB, TC4000A, and TD830XA 
TD= references TD730XA, TD700XB, and TD830XA 
TD7= references TD730XA and TD700XB 
TD73= references TD730XA 
TD730= references TD730XA 
TD730X= references TD730XA 
Note that all stations may be referenced by specifying an equal sign. 


Subnet Queue Naming Conventions 


There are two types of subnet queues (data comm files) declared in TNDL. The first type is a general 
queue. There are nine general queues: FILE] through FILE9. These nine are identical; each contains all sta- 
tions. The second type of queue is the station-unique queue. There is one queue per B9347 station with the 
name derived from the first three characters of the terminal mnemonic followed by the station identifier letter. 


Communicate queues (CQ1 through CQ9) are also declared; one for each possible user data comm task. 


Dummy Station Identification 


There are eleven dummy stations in TNDL. DC corresponds to the SPO, MCS corresponds to TMCS, 
and MX! through “MX9 correspond to each possible user data comm mix entry. The dummy stations allow 


- communication between the SPO, TMCS, and user data comm tasks. 


Task and Queue/Station Relationship 


A task ATTACH/DETACH request, processed by TMCS, corresponds to a file open/close. An AT- 
TACH queue/station request is implicitly issued on the first input/output operation between a task and a partic- 
ular queue/station. A task DETACH is invoked whenever whenever a user data comm task terminates. Individ- 
ual stations may be detached by TMCS in response to the TDS DT command. 


Task Attach 


A user data comm task must become attached to a subnet queue to receive input messages from Sta- 
tions. Correspondingly, a task must become attached to station queues in order to send output messages to 
Stations. 


TMCS allows a user data comm task to become attached to a single transaction queue at a time, even 
though many stations may be associated with a particular transaction queue. TMCS also assigns a unique com- 
munication queue to each user data comm task. This queue is only used to receive responses to TDS com- 
mands sent to TMCS by the user data comm task. Furthermore, only one task at a time may be attached 
to a given subnet queue. 


All user data comm tasks must be initiated through the TMCS via the TDS EX, RN, or PL commands. 
If a transaction subnet <queue name> is specified, the TMCS verifies its validity. Otherwise, the TMCS as- 
signs a subnet queue to the user task. The subnet queue name is included in the EXecute message which is 
ZIPped to the MCP, and the subnet queue is reserved for the task until an ATTACH QUEUE request is re- 
ceived by the TMCS from that task. 


In addition to the subnet queue, one or more stations are reserved for a user data comm task when 
the task is initiated. Good input messages from these stations are routed directly to the subnet queue. The 
first time the task sends an output message to a station, an ATTACH STATION request is received by the 
TMCS, which routes all output messages for that station directly to the NDL queue. 


Only one task at a time may be attached to a station queue. However, a task may be attached to more 
than one station queue at a time. 


If a task attempts to become attached to a subnet queue or station queue that has not been reserved 
for it (by an EX, PL, or RN command), it receives a 20 (unknown/access denied by TMCS) status. 


Task Detach 


Whenever a COBOL or MPLII user data comm task goes to end-of-job, the TMCS receives a TASK 
DETACH notification. The TMCS then detaches the task from any station queue and/or subnet queue to which 
it has become attached. Furthermore, the TMCS detaches the dummy station corresponding to the task from 
all subnet queues to which it has become attached. 


The TMCS clears out any subnet queue being detached, whose queue count is greater than zero. 


Individual stations may be detached from a task via the DT (detach) statement. The TMCS routes all 
subsequent messages to/from the stations to the MCS queue, and marks the stations as not reserved. 


MESSAGE HANDLING FUNCTIONS 
Non-Participating Mode 


TMCS operates in a non-participating mode with respect to normal transactions between user data 
comm tasks and terminals. While in the non-participating mode, TMCS is still responsive to TDS commands 
(control messages), network requested results, network (error/dialin) alerts, and task attach/detach requests. 
Figure 2-2 shows the TMCS in non-participating mode. 


Participating Mode 


TMCS operates in a participating mode, as an exception, regarding the performance of the following 
functions: 


1. Interprocess communication (IPC). 
2. Debugging. 
3. Recovery. | 
4. Network requested results. 
5. Network communications. 
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Figure 2-2. TMCS (Non-Participation for Transactions) 


INTERPROCESS COMMUNICATION (IPC) FUNCTIONS 


IPC between data comm tasks is accomplished by using the COBOL or MPLII send and receive state- 
ments in conjunction with as many as nine dummy station names: MX1 through MX9. 


A user data comm task must become enabled before it may send a message to any other user data 
comm task. A user data comm task becomes enabled for IPC by sending a TDS AT/EX/RN/PL <program- 
name> command to TMCS, and doing a receive on its CQ. If successful: 


1. The first byte of text is equal to @00@, and the symbolic source is equal to MXn, which corresponds 
to the specified program. 

2. A sign-on message of the form *AT/EX/RN/PL is queued on the specified program transaction queue 
(TQ) and its symbolic source is MXn, which corresponds to the requesting program. 

3. Both tasks are enabled for IPC with each other. 

If unsuccessful: 

1. The first byte of text is equal to @30@ and the symbolic source is equal to MCS. 

2. No sign-on message is queued. | 

3. Neither task is enabled for IPC. 


Any data comm task that is enabled may send a message to any other data comm task simply by setting 
the symbolic destination field of its output CD equal to the name of the dummy station corresponding to the 
receiving task, and issuing a send command. When the receiving task receives the message, the symbolic 
source field of its input CD contains the name of the dummy station corresponding to the sending task. 


For example (figure 2-3), suppose task 6 EXed task 3 and wished to send a message to task 3. Task 
6 accomplishes this by setting the symbolic destination field of its output CD equal to MX3 (twelve characters 


including blanks are required in the field), and issuing a send command. When task 3 receives the message, 
the symbolic source field of its input CD equals MX6. 


TASK | TASK 


(MIX 3) (MIX 6) 


SUBNET 
QUEUE 


‘ MCS 
QUEUE 


Se 


Figure 2-3. TMS Participation (IPC) 
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The first send issued by a particular task to a particular station results in an ATTACH STATION re- 
quest being placed on the MCS queue. After issuing an ALLOW OUTPUT, the TMCS receives the message 
(Type=SEND). When the TMCS detects that the <Lsn> in the message header is that of a dummy station 
(MX3), it performs the following operations: 


1. Replaces the <Lsn> field of the message header with the <Lsn> of the dummy station (MX6) corre- 
sponding to the task whose <Ltn> appears in the field of the message header. 

2. Queues the message on the subnet queue which is attached to the task (task 3) corresponding to the 
dummy station (MX3) whose <Lsn> originally appeared in the <Lsn> field of the message header. 


Note that the attachment of the tasks to dummy stations (for IPC) does not have the same significance 
as the attachment associated with the EX command. For IPC, a task may be attached to many dummy sta- 
tions, and many tasks may be attached to the same dummy station at the same time. It should also be noted 
that, in the TDS 1.0 release, the dummy station (MXn) assigned to a task corresponded to the mix number 
of that task; in the 1.1 release of TDS, however, the dummy station assignment is done in ‘‘wrap around’’ 
fashion (MX1 is assigned to the first task, MX2 to the second, regardless of the actual mix number of the 
task). 


If the dummy station is unknown, or there is no task, the sending task incurs a 20 (destination unknown 
or access denied by TMCS) status. 


DEBUGGING FUNCTIONS 


TMCS has a message tracing capability which helps to debug application programs (figure 2-4). The TDS 
commands get trace (GT) and no trace (NT) control the tracing capability. These commands may be entered 
from a terminal, a task, or the SPO. 


The output always takes the form of a printout on the line printer (or the console if there is no line 
printer). The printout may include the message header only, or the message header and text. The text may 
appear in ASCII only, or in ASCII and hexadecimal form. 


The debugging facility traces all messages associated with a task, a queue, or a station. When trace 
is turned on, the TMCS participates with only the station(s) involved in the trace. When trace is turned off, 
the TMCS no longer participates with the station(s). 
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Figure 2-4. TMCS Participation (Application Debug) 
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. If multiple traces are in progress, the messages are interspersed in the same printout in the order in 
which they occur. 


RECOVERY FUNCTIONS 


In general, the data comm user task is responsible for devising/invoking a message 
accountability/recoverability protocol between itself and the station(s) to which it is attached. 


TDS provides some helpful tools which extend the recovery features inherent in the data comm firm- 
ware to the data comm user. 


By default, the SPO operator 1s informed of situations requiring operator intervention. Optionally, a data 
comm user task and/or terminal operator may participate in the recovery process. (Refer to the TDS Command 
Language Description, Section 3, for further details.) 


Recovery may be invoked on a system level, a DCP level, a line/station level, or a task level (figure 
2-5). 


System Level Recovery 


System recovery occurs following a system error that results in a clearstart, warmstart, or restart of 
TMCS. Refer to Section 4 (Application Programming Considerations) for details. TMCS, when restarted, ac- 
cepts the name of a restart program as part of its initiating message. Message accountability and/or recovery 
is entirely between a user data comm task and its terminal operator(s) at this level. 


DCP Level Recovery 


DCP recovery occurs following a data comm hardware error. All messages associated with the failed 
DCP are returned to the MCS queue in the following order: 


1. A message of type maintenance, indicating the occurrence of a data comm hardware error. 
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Figure 2-5. TMCS Participation (Recovery) 


2. For each line/relative in the failed DCP beginning with the highest logical numbered line: 


a. The input or output message (if any) or messages (maximum one input and one output for full du- 
plex line only) in process on the line when the error occurred. Input messages are incomplete; output 
messages are complete, but must be retransmitted. It is possible for an output message to be lost 
without the system knowing it. | 
b. The messages queued (top down) for each station on the line when the error occurred. 

3. All messages contained in the request queue when the error occurred. Any in-process host control 
messages are lost. 


The TMCS displays a data comm error message on the SPO. 


TMCS logs all Output messages and partial input messages in the error log, optionally’ printing the 
-header and/or text if TMCS options DEBUG and/or CHECK are set, and goes to EOJ. 


Line/Station Level Recovery 


Whenever a line or a station goes not ready, the TMCS is notified. In addition, if an output message 
was in process for that line or station, the message is returned to the MCS queue. 


Whenever the TMCS receives a message of type output or priority output in conjunction with a line 
or station not ready condition, it records the message in the error log and queues it as a priority output mes- 
sage, thus placing it back on top of the respective station queue. | 

The TMCS then notifies the controlling function (SPO operator by default) of the not ready condition. 


The user may respond with an RY message one or more times, and may make an adjustment at the 
terminal prior to each retry (by putting the terminal in receive). 


If a recurring error is related to a specific line or station, the user may recall the messages from the 
Station queue(s) to a specified station or subnet queue, or to the line printer. The recalled messages are pre- 
fixed by 48 bytes of leader text of the form: 


<12-byte station-name>*RECALLED FROM § <Isn>/<station-name> 
or 
<12-byte station-name>@00@<35-byte message header>. 
The user may also clear the messages from the station queue(s). Finally, the user may detach (DT) the 


station(s) via an appropriate DT command. Any messages remaining in the station queue are not cleared, but 
the station(s) is returned to the TMCS. 


Task Level Recovery 


Whenever a task encounters a fatal runtime error resulting in a DS or DP, any messages which are 
queued on the task subnet queue may be recalled either to another subnet queue, to a station queue, or to 
the line printer. Each recalled message is prefaced by either: 


<12-byte station-name>*RECALLED FROM Q <lIqn>/<queue-name> 
or 
<j2-byte station-name>@00@ <35-byte message header> 


When the task is DSed, any messages remaining in its subnet queue are cleared by the TMCS at task 
detach time. 
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NETWORK REQUESTED RESULTS 


Network-requested results are returned to the MCS queue in response to specific requests from the 
TMCS. Included are: 


1. Complete and successful messages of the following types: 
. Output. 

. Priority output. 

Enable input. 

. Disable input. 

Make station ready. 
Make line ready. 

. Dialout. 

. Disconnect. 

. End recall from queue. 
. End recall from station. 


2. Messages recalled from station queue. 
3. Messages recalled from subnet queue. 
4. Station not attached. 


5. Unable to initiate. 


Input message queue to station not enabled for input (with MYUSEIN = 0). 

. Output message queue to station not enabled for output (with MYUSEOUT = 0). 
. Enable input message queue to station not enabled for input (with MYUSEIN = 
. Make-line-ready queue to line which is SWITCHED-BUSY. 

. Make-line-not-ready queue to line which is SWITCHED-BUSY. 

. DIALOUT-(LINE NOT DIALOUT CAPABLE) or (LINE BUSY) or (LINE SWITCHED-BUSY) 
or (LINE CONNECTED). 

g. RECALL/CLEAR when (STATION AND LINE) READY. 


0). 


mhoaogp 


6. Invalid network/request. 


7. Dialin received (while dialout in process). 


NETWORK COMMUNICATIONS FUNCTIONS 


TMCS provides certain commands which aid in establishing communications between the various com- 
ponents of the system (figure 2-6). They are as follows: 


1. Executing special TDS commands (LT/TEST/TO). 


a. List the TMCS tables (LT) on the line printer. 
b. Send test messages (TEST) to specified stations which are not attached to a user data comm task. 
c. Broadcast specified message (TO) to all or to specified stations that are not attached to a user data 


comm task. 
d. Broadcast specified messages to the SPO and a station regardless of whether or not the station 


is attached to a user data comm task. 
e. Queue message text on specified (DC <mix> <text>) user data comm task’s subnet queue. 


NOTE 
The receiving task symbolic source field contains DC. 


2. Echoing any non-control message received from a station that is not attached to a user data comm 
task, back to the station. 


3. Responding to test messages received from the stations. 
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Figure 2-6. TMCS Participation (Network Communications) 
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SECTION 3 
TDS COMMAND LANGUAGE 


GENERAL 


This section describes the TDS command language. First, a functional overview of the commands is 
given, structured according to functions and subfunctions. Next, message syntax, literal strings, and command 
defaults are given. Finally, the TDS commands are described. 

Note that many TDS commands purposely resemble SCL commands. They are similar in function; but 


the responses to TDS commands are data comm related. Care should be taken that TDS commands are not 
used when SCL commands are intended and vice versa. 


FUNCTIONAL VIEW OF COMMANDS 


The following is a breakdown of TDS commands by type of command and particular function. 
Task Management Commands 


Task Initiation/Attachment 


AT - Attach. 
EX - Execute. 


PL - Program load (DDE must specify PL). 


Task Discontinuation 
DT - Detach terminal from task.’ 


If last terminal, task discontinuation is by convention. 


Task Status 


MX - Data comm mix. 
PR - Priority change. 


Task Debug/Monitor > 


GT - Get trace. 
NT - No trace. 


Task IPC 


Implemented using user data comm commands SEND and RECEIVE with dummy stations (MX1 
through MX9). 


Task SPO 
CF - controlling function 


Network Management Commands 


Network Initialization 
Site Net 


A description of the network at the user’s site which is established at DC WARMSTART time by a 
configuration statement if the user network does not match the model network. 
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Directory 


Built as a function of network initialization, the phone directory includes site name, phone number, non- 
standard indicator, and subconfigurations of the remote site model configuration. When the user enters a direc- 
tory entry, the site name and subconfigurations (terminal entries) are required; the phone number and non- 
standard indicator are optional. 


Network Change 
CONF - Configuration display and change. 
DIALIN - Dial in configuration. 
END - END configuration definition. 
RL - Redefine line. 
RS - Redefine station. 
RD - Reload DCP. 
DIAL - Dial out phone number. 
DISC - Disconnect switched line. 


Network Status 
- OL - Online data comm (status, description, counts). 
- RY - Ready (line, station). 
-. NY - Not ready (line, station). 
_ EI - Enable input (station). 
_. DI - Disable input (station). 


Network Communications 
TO - Send message to (station, SPO, mix-no.). 
TEST - Test station. 
STOPTEST - Stop testing. 
ZIP - ZIP an SCL command. 


Network Identification 
WMI - Who am I. 


TDS Command Defaults 


Terminal - Echo message back to terminal. 
Task - Assume message to be TDS command. 
SPO - Assume message to be TDS command. 


Queue Buffer Management Commands 


Queue Limits 
SET (IL, OL, QL, SL). 


Queue Status 
ENQ (IL, OL, QL, SL, IC, OC, QC, SC). 


Queue Data Handling 

RE - Recall. 

CL - Clear. 
TMCS Management Commands 
TMCS Initiation 

TMCS - Initiate TMCS. 
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TMCS Discontinuation 
TERM. 


TMCS Log 
LL - (EVENT, ERROR, CONTROL). 
LC - (EVENT, ERROR, CONTROL). 
LT - List TMCS tables. 


TMCS Global Run Time Options 
SO - SET (DEBUG, RECOV, CHECK, EVLOG, ALLOW, ERLOG, COLOG, SHIFT). 
RO - RESET (DEBUG, RECOV, CHECK, EVLOG, ALLOW, ERLOG, COLOG, SHIFT). 
LO - LIST (DEBUG, RECOV, CHECK, EVLOG, ALLOW, ERLOG, COLOG, SHIFT). 


TMCS Identification 
WRU - Who are you. 


TMCS Command Input 
CC - Use TMCS ‘‘Control CARD”’ file from disk. 


Message Syntax 


The complete syntax for each TDS command and response is described as a railroad diagram. The rail- 
road diagram provides a concise and easy to use definition of the syntax of each TDS command. 


Below is the railroad diagram for the syntax of part of the clear command. Interpretation of the diagram 
is discussed below. 


CLEAR STATION ——<lsn> 


Scena 


<station-name> 
E—EG1812 


The diagram should be read from left to right unless flow arrows indicate differently. 


A name not bounded by < > is a required word. A required word may be entered in one of two forms. 
It may be entered in its entirety or in abbreviated form. The abbreviated form is indicated by the underscored 
letters in the word. For example, in the word CLEAR, the letters CL are the abbreviated form. 


If two entities not enclosed in < > are separated by a horizontal line, such as Station-<Isn>, then at 
least one blank character (horizontal space) must separate the entities. 


The diagram should be read from left to right following the lines or tracks. All valid variations of a 
command may be generated by starting on the left, typing each entity as it is encountered until the end point 
on the right is reached. 


The following are valid messages for the above examples: 
1. From the SPO 

DC CLEAR STATION 3 

DC CL S 2 

DC CL TD830XA 
2. From a task 

CL S 0 

CLEAR B93A 

CL TD7A 
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Literal Strings 


Literal strings appear as output in some of the externally formatted OL responses, and as input in the 
RL and RS commands. | 


Literal strings may comprise hexadecimal strings, graphic strings, or both. 


When a literal string appears as output, it always appears as a hexadecimal string. In addition, if applica- 
ble, the hexadecimal string is followed by a graphic string preceded by a slash (/) (such as 40/@, 41/A). 


When a literal string is required as input, either a hexadecimal string or a graphic string may be entered, 
but not both. A hexadecimal string comprises an even number of hexadecimal digits, delimited on either end 
by an @ sign, for example, @41@. A graphic string comprises one or more displayable characters delimited 
by quotation marks, for example, ‘‘A.”’ 


Response Formats 
Some TDS commands and responses can appear in both internal and external (displayable) format. 


The internal format response may be obtained from an applicable TDS command by including a non- 
displayable character (less than an ASCII @20@) in the command text preceding the command verb, such 
as, @00@ OL TD8A D. Commands MX and OL are capable of returning immediate (CQ) internal format re- 
sponse. Commands capable of causing delayed (TQ) internal format messages using the form 


@00@ <35-byte msg-header><annotated msg-result> 


are: CF, Di, DIAL, DISC, EI, NY, RE, and RY. 


See Appendix G for a complete hst of command résponses. 


Command Defaults 


Three TDS commands have the verb as an option: TO, ENQ, and EX. The command on the left ts 
implied whenever the entry in the column on the mght is encountered. 


Command Defaulted Entry Made 


To <mix> 
<mix> /<program-name> 
ALL 
SPO 
stations 
$ / 


ae 


ENQ <station-name> 


EX <program-name> 


TDS COMMAND DESCRIPTIONS 


AT (Attach) 
*AT program-name> 
disk-id >—/ <queue-name> i NOACK text> 
9 
EO1S11 : <sta. name » 


The DC attach command works like the DC execute command (see EX) with two exceptions: 

1. A new copy of the program is never started; instead, an error is returned if the requested program/ 
queue combination is not present. 

2. A sign-on message of *AT instead of *EX is queued on the user’s transaction queue. 


Examples 


*AT DCTESTMPL 
DC AT RJEUSER FILE1/ 
AT DCTEST TD8= 


Associated Commands 
DT, EX, RN, PL 


Intended Use 
To allow a terminal, task, or SPO to become attached to an existing user data comm task. 


CC (Control Card) 


CC 
<file-name> 
<disk-id>/<file-name> 


ED1560 <disk-id>/ 


_ This command allows the user to enter TDS commands via a CANDE-compatible unsequenced DATA 
file blocked 720/80. TMCS opens the file and begins reading and processing TDS commands from the file until 
an end-of-file condition is is encountered. Each time a command is processed, a copy of the command along 
with the TMCS response to the command is written to an output file (TDS.OUT) on the disk pack containing 
the input file. ; 


The default file name is TDS.IN. The default disk pack is the TMCS pack, or alternately, the system 
pack. 


Adjoining TDS commands within the input file must be in separate records, separated by semicolons. 
A single command should not exceed 253 characters. 


In general, commands that may not be entered from a terminal may not be included in the TDS.IN 
file. (Four exceptions are SO, RO, LO, and SET.) Commands that may be included in the TDS.IN file, how- 
ever, are not restricted in the same way as they are when entered from a terminal. For example: 

1. DC CONF is not allowed from a terminal and therefore is not allowed in the TDS.IN file. 
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2. EX 1s allowed from a terminal and therefore is allowed in TDS.IN file as well. However, EX 


CMSCANDE TD8A, not allowed from a terminal because a station name has been specified, is allowed in 
the TDS.IN file. 


Program initiation/attachment initiated via EX, RN, PL, and AT commands contained in a TDS.IN file 
will produce sign-on messages from dummy station *‘CC’’. TMCS maintains a symmetrical interface with re- 
gard to dummy station ‘‘CC’’ so that a user task may also send messages to dummy station ‘‘CC’’. Messages 
thus sent are recorded in the TDS.OUT file. AS long as there is at least one outstanding task initiated from 
a command in the TDS.IN file, the TDS.OUT file remains OPEN. In addition to sending messages to dummy 
Station “‘CC’’, a user task may DT dummy station ‘‘CC’’ from its own transaction queue (TQ). 


Intended Use 
To be used in conjunction with other TDS commands that have known and/or complex parameters. CC 


also provides a means for executing prescribed commands automatically following clear/start on a SPO-less 
system. 


CF (Controlling Function) 


CF 
SPO : : ~ | 
| 
-name> 


oo oe eas lIn> <station 


' This command allows a task or the SPO operator to request to become the controlling function of the 
specified data comm resource(s): DCP(s), and/or line(s) and/or station(s). 
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The SPO ts the default-controlling function for each data comm resource. If SPO is specified, the SPO 
is assigned as the controlling function of the specified data comm resource(s). 


| If the CF command was entered from a task and SPO was not specified, the requesting task is assigned 
as the controlling function of the specified resource(s) only if the SPO is currently the controlling function 
of these resources. 


If an error is detected in the analysis of this command syntax, the request is terminated. However, as- 
signments made in the request (prior to the error) for previous resource types are still valid. 


When a task goes to EOJ, the SPO operator automatically becomes the controlling function of the data 
- comm resources for which the task had become controlling function. This command may request a response 
in the internal format by being preceded by a non-displayable character (less than ASCH] @20@). 


Examples 
DC CF SPO TD830XA, TD830XB 
DC CF DCPO L1 TD8A 
DC CF LINE 0 
DC CF DCP 0 TD8AB 


Associated Commands 
DI, DIALIN, DIAL, DISC, EI, NY, RD, RY 


Intended Use 


To allow a user data comm task to exercise the equivalent control over a specified data resource (DCP, 
line, station) that can be exercised by the SPO operator or by an MCS itself. This includes: 
1. For a station, the ability to enable/disable input (EI/DI) and to make the station ready/not ready (RY/ 
NY) as well as the ability to receive all message results (including the full message headers) relating 
to changes in the Station status. 
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2. For a line, the ability to make the line ready/not ready (RY/NY), to initiate/terminate switched line 
activity (DIALOUT/DISC), and to reconfigure a switched line to correspond to a specified remote 
site as described in the site phone directory (DIALIN), as well as the ability to receive all message 
headers relating to changes in the line status. 

3. For a DCP, the capability of reloading a DCP (RD), as well as the capability of receiving DC HARD- 
WARE ERROR message results (including the entire message headers). 


CL (Clear Message for Specified Station/Subnet Queue) 


CLEAR STATION —— ¢lsny ————_—+] 


¢ station-name> 
QUEUE ——~<iIqn> 


<queue-name> / 


£01514 


This message is used to remove messages currently queued on the specified station or subnet queue. 
If the CL command is entered from a terminal, no station or queve may be specified; only the implied station 
is cleared. 


Examples 


DC CL S 10 

DC CL TD7AB 
DC CLQ 1 
DC CL FILE!/ 


Associated Commands 
RE, RY, NY, RD, EI, and DI. 


Intended Use 
To clear a station or subnet queue as part of a line/station level or task level recovery. 


CONF (List(Change DC Hardware Configuration and/or Build/Modify Site 
Phone Directory) 


ebised NOLIST 


This command lists the DC hardware configuration on the line printer, followed by the message DC 
HARDWARE CONFIGURATION on the SPO. If the NOLIST option is specified, printing of the DC hard- 
ware configuration is bypassed. If no changes are desired, the command DC END may be entered from the 
SPO. Otherwise, the DC hardware configuration may be entered in its entirety as one or more <network- 
units> from the SPO. 
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The format of a <network-unit> is as follows: 


——»— <type-mnemonic> <line-number 


emnate 
an 


| 7 < station-letters > “To 
£01513 <speed )>—¢ sta letters > 


where <type-mnemonic> ts the first three characters of the terminal mnemonic; <line-number> is a single 
digit, 0-3; and <station-letters> is the seventh character of the <station-name> for one or more stations. The 
specified stations are then configured onto the specified line. If the optional speed is specified, all stations 
are adjusted to the same specified speed. If no speed is specified, the speed of the first specified station 1s 
used and all subsequent stations are adjusted to match the speed of the first station. The ‘‘=’’ signifies all 
Stations having the specified <type-mnemonic>, while <speed> is a valid station speed. 


NOTE 
There are no spaces in a network unit. Configuration changes can be made via the 
RS and RL commands during DC hardware configuration as well. 


In addition, other TMCS commands may be entered during the routine. If CONF is implicity begun 
as a part of TMCS initiation, the NY command may be entered to mark a line to be left not ready after 
initialization. The SO and RO commands may be entered to have the SHIFT options saved in the SITENIF. 
The SET command may be entered to have network limits saved in the SITENIF. 


When the first <network-unit> is entered, TMCS configures the network according to the current SI- 
TENIF if one exists. All stations are removed from lines; a station cannot be moved directly from one line 
to anather. As <network-units> are entered, stations are moved onto lines as the <network-units> dictate. 
If an error is encountered while entering a <network-unit>, all stations are removed from lines and DC 
HARDWARE CONFIGURATION is repeated. 


If CONF is entered at TMCS inititaion, the MODELNIF is checked against the current NDLSYS file. 
This is to verify that the SITENIF (if present) contains information valid for this NDLSYS. This would not 
be the case if the user changed NDLSYS files between runs of the TMCS. If the MODELNIF 1s absent or 
invalid, anew MODELNIF and new SITENIF will be built; after the first <network-unit> input, the old ones 
will be overwritten. Also, a warning message is issued and the phone directory, if present, is removed. 


The B80/B90 does not presently support dynamic reconfiguration. Station attributes cannot be changed 
nor can stations be moved on or off lines. Instead of moving stations, TMCS marks them absent (makes them 
not ready). When <network-units> are entered, TMCS marks the stations present (makes them ready). 


Example 


DC CONF 
<network-units>: 
TD70ABC 
TD81ABCD 
TC42AB 
TD81A4800 
TD70= 
TD82=9600 
TD8&1tA9600BCD 


Associated Commands 


END 
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Intended Use 


To describe the site network as a subset of the model network selected for your site. This only needs 


to be done the first time TMCS is run or whenever the site configuration is modified, and to build/modify 
a site phone directory. 


Building/Modifying Site Phone Directory 


After entering the END command, the message ENTER DIRECTORY BUILDER? (Y OR N) is dis- 
played on the SPO; N terminates the routine, Y causes BUILD NEW DIRECTORY (Y OR N) to be displayed 


on the SPO. Entering a Y indicates the desire to build a new directory and N indicates the desire to update 
an existing directory. 


TMCS displays ENTER REMOTE SITES and the operator can then enter remote sites as follows: 


CN) <phone-number> < network-unit list > 


where <site-id> is a 12-character name identifying the site (must begin with an alpha character); (N) indicates 
a non-standard site; <phone-number> is the phone number of the remote, consisting of up to 15 numeric char- 
acters; and <network unit> is as previously descnbed. 

The entry of <site-id> alone indicates that the site is to be deleted. 

If a site is to be updated, all <network units> for that site must be re-entered. 

Non-standard site forces exclusion of that site from the line when it is configured. 


END terminates this procedure. 


As part of initialization, all stations are moved off each line represented in the site phone directory. 
Each line is configured by ORing together all standard sites for that line. If no standard sites exist, the line 
is left vacant. Each non-vacant line is made ready unless TMCS was instructed to leave the line not ready 
via a NY L <IlIn> command in DC hardware configuration. 


DI (Disable Input) 


DI STATION ———> <lsn> 


<station-name> 
ED1515 


This command allows the user to logically disable input from a specified terminal. The requester must 
be either the controlling function of the station or an attached task. This command may request a response 
in internal format if preceded by a non-displayable character. 


Examples 


DC DI 11 
DC DI 2/B93A 


Associated Commands 
EI, MX, NY, DL, RY 
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Intended Use 


To permit the user to control the disabling of input from a terminal (such as when a request from a 
priority terminal required the undivided attention of a user data comm task for the performance of some func- 
tion). The task could do the following: 

1. Disable input from its other terminals. 

2. Process the messages which are already in its subnet queue (the disabling of input from a terminal 

does not prohibit output to it.) 

3. After the prionty function is completed, enable input (refer to EI) from its other terminals. 


DIALIN (DIALIN Configuration) 


DIALIN < phone-number> 


<site-number > 
EDI516 


This statement allows a user task or SPO operator to configure a switched line to conform to the 
specified remote site in the site phone directory. 


The requester must first become the controlling function of the line in question. The <phone-number> 
or <site-name> must correspond to a valid site in the site phone directory. 


If the switched line is not busy, it is configured and left not ready. The requester must issue a RY 
L <lin> command to make the line ready for dialin. 


When a dialin alert or disconnect result is received, it is reported to the line controlling function in ac- 
cordance with the format specified when the CF command was issued. If a disconnect result is received, it 
is reported to the line controlling function. In addition, if the line was connected to a standard site, it is recon- 
figured to the TOTALSITE configuration. If the site was non-standard, the line is not reconfigured. In the 
latter case, the controlling function should issue either another RY L <IIn> command to allow for a dialin 
or a DISC L <IIn> command to allow the line to be reconfigured to the TOTALSITE configuration. 


Examples 
DC DIALIN SITE]1 
DIALIN RJESITE!] 


Associated Commands 
CF. DIALOUT, DISC, RY 


Intended Use 


To permit a user to prepare to receive a dialin alert from a site (in particular a non-standard site). 


‘ 


DIALOUT (Dial Specified Station) 


DIALOUT <phone-no. #1 > 


<site-name > 


LINE —<lIn>—<phone-no. #2> 


—D1537 
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This statement allows the user to dial a remote site. It performs differently depending upon whether 
a directory option (phone no. #1 or site-name) or a line option was specified. The site phone directory is built 
as a function of DC warmstart. The directory may also be modified as required. 


The site phone directory is organized alphabetically by site-name. For each site-name listed, the fol- 
lowing information is included: 

1. A site name. 

2. An optional non-standard indication. 

3. An optional phone number for dialing out. 

4. <IIn> 

5. Subconfiguration of the remote site configuration. 


If the <site-name> or the <phone-no.> is passed, TMCS searches the site phone directory to verify 
the validity of the information. 


If a valid <site-name> or <phone-no.> is specified, TMCS checks to see if the remote line is con- 
nected. If it is connected to the requested site, the user receives a good response. If the remote line 1s con- 
nected to a site other than the requested site, an <in use> error is monitored. 


If the remote line is not connected, TMCS does the following: 

1. Reconfigures the remote line based on the information contained in the site phone directory. 

2. Queues a message (TYPE = DIALOUT) on the NDL queue, with the phone no. in the text field. 
3. Returns an immediate good result to the requestor (CQ). 

4. Awaits a result and, when received, reports it to the requestor (TQ). 


If LINE <Iln> <phone-number#2> is specified, TMCS ensures that the requestor is the controlling 
function for the line. If not, an error response is given. Next, a check is made to ensure that the line is not 
represented in the site phone directory. If it is, an error response is given. If no errors are detected, TMCS 
proceeds as indicated in steps 2 through 4. 


Example 
DC DIAL BURR-DTN-8 
DC DIAL 215 S55 1111 
DC DIAL LINE 0 1 215 555 1111 


Associated Commands 
DISC, CF, DIALIN 


Intended Use 


To connect with one or more terminals at a remote site over a switched line. 


ace See TRAE 


DISC (Disconnect Specified Line | or r Station) | 


DISCONNECT 


<site-name > 
LINE <lln> 


EDiI518 


This Statement allows the SPO operator or task to disconnect the specified line or site. The disconnect 


statement is similar to the statement NY L <IIn>. The only difference is that it generates an immediate-line- 
—hot-ready request instead of simply a make- line-not-ready request. The immediate-line-not-read 


not sensitive to whether or not the line is busy; that is, the line is made not ready and is disconnected upeR 
sagas of the request. 
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If a switched line is referenced by one or more sites in the site phone directory, it is automatically con- 
figured to the TOTALSITE configuration. Therefore, no matter which of the standard sites dials in, the <site- 
name> can be entered as the first message from that site. TMCS can then reconfigure the switched line from 
the phone directory to match the site. 


___ If the line is configured to TOTALSITE, and a directory dial is performed, TMCS configures the 
switched line to match the specified site in the phone directory and to initiate the call. 


Example | | 
DC DISC BURR-DTN-8 
DC DISCONNECT L 0 


Associated Commands 
CF, DIALOUT, DIALIN, NY 


Intended Use 


To break a previously made connection with one or more terminals at a remote site over a switched 
hne. arene re Gio! ara aed GB ah Nees Linoaee’ = cneetatt REE HAR RE es co het mand NP Be be ‘ : ee tee ye a Va aa 


DT (Detach Queue/Station) 


! : <text> 


<queue-name)> / : = 


EO01519 
DC 
tation-name> 


’ 


If the request 1s entered from a station, only DT may be specified. 


If the request is entered from the SPO or a user data comm task, the queue name. must be specified. 
If the queue name is not followed by a station name (DC) or an equal sign, the implied dummy station DC 
or MX mix, respectively, is assumed. When a user data comm task is initiated from the SPO or from another 
user data comm task, the dummy station (DC, or MX <mix>) corresponding to the SPO or initiating task 
is implicitly attached as part of the queue (refer to EX). Otherwise, queue name must be followed by a <sta- 
tion-name>, DC, or an ‘“‘=’’. 


In either case, the DT request causes the TMCS to detach the specified station or implied dummy sta- 
tion from the indicated user task. Each subsequent attempt to SEND a message to a DTed station results in 
a STATUS KEY of 20 (destination unknown or access denied by TMCS) to the user. Also, a signoff message 
of the format *DT is queued so additional input messages from a DTed station are placed on the user subnet 
queue. A good response is sent to each station being detached, unless NOACK was specified for that station 
when it was originally attached (see EX). 


If a dummy station MXn is being detached either implicitly or explicitly, and a user supplied tag is asso- 
ciated with this command, (see Section 2) the detachment of the sending task from the implied task will not 
actually take place, although all responses and notifications will be returned/forwarded as if the detachment 
had taken place. 

If the optional <text> is specified, it will be appended to the sign-off message (...*DT<text>). 


3-12 


Finally, if the subnet queue is vacant (last or only station, including dummy stations, has been de- 
tached), the TMCS queues a *VACANT message on the user subnet queue. The user should perform an or- 
derly shutdown. 


Example 
*DT 
DC DT TD7A 
DC DT FILE}1/ 
DC DT TD7ABC 


Associated Commands 
AT, EX, PL, RN 


Intended Use 


To enable the user to sol his station or mney, station (DC or ce from the implied user 
data comm task. CuDu et reece. th fo ue leah Var | 


ae © 


spieainnebiosioin sualiag er : 


El (Enable _— 


El 


STATION — <isn > 


£D1520 ¢station-name> 


This command allows the controlling function to logically enable input from a specified station. This 
command receives an internal format response if preceded by a non-displayable character. 


Examples 


DC EI § 24 
DC EI B93A 


Associated Commands 
DI, MX, NY, OL, RY 


Intended Use 


To Permit the user to control the enabling of input from a terminal (refer to DI). 


END (Terminate DC Hardware Configuration) 


EN 


»  €OI§2) 


This message is used in conjunction with DC CONF, and terminates DC hardware configuration and 
directory build/modify. 


Example (refer to CONF) 
DC END 


Associated Commands 
CONF 
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Intended Use 


To terminate the entering of a new DC hardware configuration and the building or modifying of a site 
phone directory. 


ENQ (Enquire Limit/Count) 


ENQUIRE -Isn> 


‘—p— (station-name > 
<mix > 
—>— | (program-name> 
<Iqn> 


/ —— (queue-name > 


“™ 


Isn > 


ie 


/ —- Cstation-name> 


EKReERRE RHE 


ED1522 


This statement allows the user to inquire about the contents of the specified lmit/count. 


There are four types of limits/counts associated with message flow through the system. They are: 
Input limit (L)/input count (IC). 

Output limit (OL)/output count (OC). 

Subnet queue limit (QL)/subnet queue count (QC). 

Station queue limit (SL)/station queue count (SC). 


In addition, a count of messages on the MCS queue can be obtained (MC). 


The meaning of each limit/count is detailed in the following paragraphs. 
IL/IC 


The DCC maintains an IL/IC for each station participating with the TMCS on input. Each time a good 
input message (result=0) is placed on the TMCS queue by a station, its IC is incremented by 1. Whenever 
the TMCS issues a continue station communicate, the station IC is decremented by 1. If a station attempts 
to input a message and its IC is greater than or equal to its IL, message space is not allocated and the input 
is refused. The IL is initially set to 2 by the NDL compiler, but it can be altered by the TMCS in response 
to a set limit command (refer to SET). 


OVOC 


The DCC maintains an OL/OC for each user data comm task participating with the TMCS on output. 
Each time a message of type SEND is placed on the MCS queue by a user data comm task, its corresponding 
OC is incremented by 1. Whenever the TMCS issues a continue task communicate, the task output count is 
decremented by 1. If a task attempts to SEND a message and its OC is greater than or equal to its OL, mes- 
Sage space is not allocated and the task is suspended. The OL for each task is initially set to 2 by the NDL 
Compiler, but can be altered by the TMCS in response to a set limit command (refer to SET). 


QUQC 


The DCC maintains a QL/QC for each subnet queue in the system. Each time a good input message 
(result=0) is placed on the subnet queue by a station which is not participating with the TMCS on input, the 
subnet queue QC is incremented by 1. The QC is also incremented whenever the TMCS queues a message 
on the subnet queue. Whenever a message is removed from the subnet queue, its QC is decremented by 1. 
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If a station attempts to input a message and the subnet queue QC is greater than or equal to its QL, message 


space is not allocated and the input is refused. The QL is initialized to 2 by the NDL compiler but may be 
altered by the TMCS in response to a set limit command (refer to SET). 


SLSC 

The DDC maintains an SL/SC for each station queue. Each time an output message is sent to a station 
by a task which is not participating with the TMCS on output, the station SC is incremented by 1. The SC 
is also incremented whenever the TMCS queues a message for this station on the TNDL queue. Whenever 
a message is removed from the station queue, its SC is decremented by 1. If a task attempts to send an output 
message to a station whose SC is greater than or equal to its SL, message space is not allocated, and the 
task is suspended. The SL is initialized to 2 by the NDL compiler, but may be altered by the TMCS in re- 
sponse to a set limit command (refer to SET). 


Response 


FROM TMCS: STATION —<Isn> ! 


¢station-name> : IL = <integer> 
<program-name> : OL 
i. ae 
<queue-name>  : QL 
i; ane 
STATION ——»<Isn> §  Cstation-name> : SL 


TASK ———> <mix) | 


QUEUE —— <Iqn> | 


Example 


DC IL 2 

DC IC 14/TC 4A 

DC OL 2/DCTEST 

DC ENQ QL 0/B93A 

DC QC 1 

DC ENQUIRE SL 14/TC4A 
DC SC 0 


Associated Commands 
SET 


Intended Use 


To inform the (SPO) operator of the number of messages allowed and/or that currently exist in one of 
the following ways: 


1. From a given participating terminal to the TMCS (IL/IC). 
2. From a given participating task to the TMCS (OL/OC). 

3. From non-participating terminals to a given queue (QL/QC). 
4, From non-participating task(s) to a given terminal (SL/SC). 
5. On the MCS queue. 


EX (Execute Program) 


EX ae pe 
<disk-i <«queue-name> i NOACK i) text 
: New | 4 ° 


’ 


£01524 ¢ Sta-name> 


The data comm execute statement works like the CMS execute statement unless a copy of the requested 
program is already running with the specified (or implied) <queue-name>. In this case, the specified (or im- 
plied) station is attached to the current copy of the program. 


The <disk-id>, if specified, must be the name of a valid disk pack. If omitted, the system pack is as- 
sumed. 


The <queue-name>, if specified, must be the name of a valid subnet queue, as declared in the TNDL| 
file section. If omitted, the lowest numbered general queue (FILE! through FILE9) not in use is assumed. 
If NEW/ is entered, a new shared copy of the requested program is initiated using the lowest numbered avail- 
able general queue. 


If the execute statement is input from a station and a <queue-name> is specified, it must be either 
a general <queue-name> (FILE1 through FILE9) or the station’s own station-unique subnet <queue-name>. 


If a ‘‘/’ is specified, all available stations comprising the specified or implied subnet queue are attached. 
If there is not at least one available station, an error is monitored. 
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If an ‘‘=”’ is specified, all stations comprising the specified (or implied) queue are attached. If one or 
more stations are already attached to a different task/queue, the request is rejected. 


If a <station-name> list is specified, all specified stations comprising the specified or implied queue 
are attached. 


Ifa ‘‘/’, “‘=°’, or <station-name> list is not specified, the initiating station or dummy station (if initi- 
ated from the SPO or a user data comm task) only, is attached. 


If the execute message is input from the SPO or from a user data comm task, the dummy station corre- 
sponding to the SPO or initiating task (DC or MX <mix>, respectively) is implicitly attached as part of the 
subnet queue, in addition to the specified stations. Subsequently, if the initiating task goes to end-of-job, its 
corresponding dummy station (MX <mix>) is detached from all subnet queues to which it has become at- 
tached. Also, the SPO or initiating task may detach itself from a queue via the DIT <queue-name> message 
(refer to DT). Note that unless the initiating task goes to end-of-job or the SPO or initiating task DT’s itself 
from the queue of a task which it has initiated, the task queue will never become vacant (void of attached 
stations) even if all of the real stations DT themselves. 


If the optional NOACK is specified, the good responses are not sent to the specified stations, nor will 
detach indication be sent when the station detaches. 


If any characters remain in the EX request, they are assumed to be user text, and are appended to 
the *EX as part of the sign-on message. The optional ‘*:’’ may be used in ambiguous cases to indicate that 
what follows is to be treated as user text. 


If the execute request is valid, the following will occur: 


1. If the requested program/queue combination is already running, and NEW/ was not specified, the 
specified/implied station(s) is attached to that task. Otherwise, a CMS EX statement of the form, 
EX <program-name> <queue-name> <CQ-name> <dummy-station (MXn) name>, is ZIPped by 
TMCS, and the specified/implied station(s) are attached to the new task. 


NOTE 
The dummy station name, MXn, does not necessarily correspond to the mix num- 
ber of the initiated task. Instead, it is selected from the unassigned dummy stations 
in round-robin fashion. For example, if MX6 is the last dummy station assigned, 
the search starts with MX7. 


2. For each specified/implied station, including dummy stations, a sign-on message is placed on the user 
subnet queue. The format of the message is: 


<text> 


If the execute request was entered from a task, the good response is returned on the initiating task 
communicate queue (CQ), prefaced by a three-byte fetch value (@00XX00@). Also, an *EQ message 
is placed on the initiating task transaction queue. In both cases, the symbolic source field of the 
initiating task’s input CD matches the name of the dummy station (MXn) assigned to the initiated 
task. The initiating task may send messages to the initiated task via its assigned dummy station, 
MXn. Until the initiated task does its first receive from its transaction queue, however, the initiating 
task’s output count (OC) Is not decremented on such sends. As a result, the initiating task’s output 
count may accumulate beyond its output limit (OL), resulting in suspension of the initiating task. 


3. When the initiated task performs its first receive on its subnet queue (this may already have been 
done for an existing task), a good response is sent to each specified/implied station, unless NOACK 
was specified. If the execute request was entered from a task, an attach queue message, *AQ, is 
also placed on the initiating task’s transaction queue. (The symbolic source field of the initiating task 
input CD contains the name of the dummy station assigned to the initiating task: MXn.) Once the 
*AQ message is received, the intitating task may send messages to the initiated task via its assigned 
dummy station, MXn, if the initiating station OC is decremented properly. Also, if the initiating task 
had already sent one or more messages to the initiated task, its OC is decremented accordingly when 
the *AQ message is received. 


4. If the execute request is invalid, or is valid but an error is encountered while trying to carry it out, 
then an appropriate error response of the form listed later is returned to the requestor. If the execute 
request is entered from a task, the error response is returned on the initiating task communicate 
queue (CQ), prefaced by a three-byte fetch value. In this case, the symbolic source field of the initiat- 
ing task’s input CD equals the name, MCS. 


5. The execute request may be valid and be completed successfully, yet be rejected by the initiated 
task for some reason, (based on the sign-on message). Or, the initiated task may go to EOJ without 
ever receiving from its transaction queue. In either case, a delayed message is placed on the initiating 
task transaction queue. Its format is: 


i ee a 
EOJ 


This message normally appears in place of the *AQ message, but may also appear afterwards, (such 
as when the initiated task goes to normal EOJ). If the initiating task has sent one or more messages 
to the initiated task, and the initiated task went to EOJ without ever having received from its TQ, 
then the initiating task OC is now decremented accordingly. 
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Examples 
* DCTEST 


DC DEMO.CONTROL 
DC TD.SCREENS TD 
~ DCTEST / 

- DCTEST FILE1// 
bc EX TDSPACK/FILE.INQUIRY FILE2/TD7=, TD8ABC USER TEXT 
DC DEMO FILE1/= 

DC SCREEN TD7A/ 


Associated Commands 
AT, DT, PL, RN 


Intended Use 


To allow the user to initiate and/or become attached to a shared copy of a specified user data comm 
task. 


GT (Get DC Trace) 


GT <mix > 


/ ——»<prog-name> 


Looe! 


DISK 
desiatiaosie 


QUEUE ——»<Iqn> O 
<queue-name> / 
STATION ——><<lsn 
<station-name > TEXT 
ED1525 ~ 
HEX MONITOR 


This statement allows the user to obtain a trace of the messages associated with a particular task, queue, 
or station to be printed on the line printer or stored in a disk file (TDS.EVLOG). Messages traced are those 
between a task and an attached station (messages of type SEND from the task, and of type INPUT from the 


station). 


By default, only the message header for both input and output is printed out. If TEXT is specified, 
the message text is also printed. If TEXT and HEX are specified, the message text is printed in both 
hexadecimal and graphic form. If I or O is specified, only input or output messages are traced. Input implies 
any messages of type ‘‘1’’ (input), ‘‘4’’ (enable input) or ‘'S’’ (disable input). Output implies any messages 
of type ‘‘2’’ (output), ‘*3’’ (priority output) or ‘‘24’’ (send). If both input and output are set, messages of type 
— ‘6’? (make station ready) and ‘‘7’’ (make station not ready) are also traced. 


If MONITOR is specified for a station and data comm installation tool NDL is used, TMCS queues 
an output message indicating to NDL to monitor protocol characters. The control characters appear in the 
trace but are stripped out of the message text before being processed. This function is supported only on sta- 
tions whose name begins with ‘‘TC’’, ‘‘TD’’, or ‘‘DIT’’. 


If DISK is specified, messages are logged to the TDS event log (TDS.EVLOG). If one is not already 
on disk, a new event log of 512 records is opened. If <integer> is specified, the size will be <integer> times 
512. | | 
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It should be noted that the TMCS participates with any station involved in a trace. As soon as the trace 
is terminated (refer to NT), the TMCS no longer participates. 


Example 


DC GT FILE!/ 
DC GT STATION 14 


Associated Commands 
NT 


Intended Use 
To permit the application programmer to obtain a trace listing of specified message headers and optional 
text on a site line printer. 


LC (Log Comment) 


LC EVENT <comment> —_——_—>| 


ERROR 


ED1526 CONTROL 


This statement allows a user to enter a comment into the specified log. The comment may consist of 
any displayable character, and may not exceed 120 characters in length. 


Example 
DC LC ER 3:00 PM, TUES, JUN 28,1977 THUNDER STORM IN THE AREA 
DC LC CO 2:00 PM, WED, AUG 3, 1977 PRIORITY USER DATA TASK 


Associated Commands 
LL 


Intended Use 


To allow an operator to insert meaningful comments into the TDS logs. 
LL (List DC Event/Error/Control Log) 


LL 
EVENT n 
ERROR 


CONTROL 


—D1§27 


This statement lists the contents of the specified (or implied) log(s) on the line printer in hexadecimal 
form. If no log is specified, the combined logs are listed according to the chronological order of the events: 
Otherwise, the contents of the specified log are listed. Any formatting of output, reduction, and so forth, must 
be done by a separate log analysis program. 
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If the optional <n> is specified, the most recent <n> entries in the log are printed. The ERROR and 
CONTROL Jogs are actually the same file, so if <n> is specified for one of these types, all entries of the 
specified type in the file’s <n> most recent entries are printed. By default, the EVENT log is closed; thus 
the EVLOG option must be enabled before listing it. 


Three types of logs exist in TMCS: an EVENT log, which records all messages processed by the 
TMCS; an error log, which records all error messages and fetch value errors; and a control log, which records 
all TMCS control messages. 


The TDS control log contains the following types of messages: 


1. All TDS commands, as well as messages derived from the TDS commands, including: 
a. SET (input, output, and queue communicates). 
b. QUEUE initiating message communicates. 
c. DISALLOW communicates associated with DT command. 
d. Logged comments (LC) messages. 


2. ATTACH/DETACH messages as well as the resulting ALLOW/DISALLOW communicates. 
3. Dialin alerts. 


The TDS error log contains the following types of messages: 
1. All error messages reported to the TMCS. 

2. DC communicate (fetch value) errors. 

3. Non DC errors (such as LC messages). 


The TDS event log is a disk file comprising entries similar to the TDS error log. 


The TDS event log may be disabled via the TDS RO EVLOG command and enabled via the TDS SO 
EVLOG command. 


All messages processed by TMCS are logged in the TDS event log. 


The default size of the EVENT and CONTROL/ERROR logs is 512 records. The user may specify the 
size of new log files (having removed the existing ones first) by passing to TMCS an initiating message, LOG- 
SIZE = <n>, where <n> is the number of records to be contained in the log files. When either file becomes 


full, it wraps around. Therefore, only the last <n> entries are available. 


The format of the CONTROL/ERROR log header record is shown in table 3-1. The log record format 
is shown in table 3-2. 


Example 


DC LL ER 
DC LL CONTROL 


Table 3-1. CONTROL/ERROR Log Header Record Format 


Byte Content 

0 ‘ @00@ = log has not wrapped around 

@FF@ = log has wrapped around 

1-2 Number of the first logical record 

3-4 Count of the number of ERROR type entries since this log was started 
5-6 Count of the number of CONTROL type entries since this log was started 
7-8 Record number of the last TERM command 

9 Indication of how TMCS was last terminated 


@FF@ = abrupt termination (a DS) 
@00@ = normal termination via TERM command 


10-11 Size of log file 
12-13 Number of last logical record 
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Table 3-2. Log Record Format 


Byte Content 
0 Log type: 0 = EVENT 
= ERROR 
2 = CONTROL 

1 Message type: 0 = Comment 

1 = Message 

2 = Communicate 
2-3 Sequence Number (per log type entry) 
4-6 Date of entry of the form YYMMDD 
7-9 


Time of entry of the form HHMMSS 


If message type = 0: Comment text 
If message type = 1: Message header (35 bytes) plus text 
If message type = 2: Communicate data 


10 to end of record 


Associated Commands 
LC, LO, RO, SO 


Intended Use 


To provide a means for on-site personnel to obtain a listing of the TDS logs. 


LO (List Option) 


This command allows the user to list the state of the runtime options. The states of all options are 


tested, and those that are set are displayed. The options may be set and reset via the SO and RO commands, 
respectively. 


Response 


FROM TMCS: ##RUNTIME OPTIONS ARE: rs es Se ta 
ERLOG EVLOG 


DEBUG RECOV CHECK COLOG ALLOW SHIFT 
EX 
RN 
‘ PL 
<prog.-name> 
Example 
DC LO 


Associated Commands 
RO, SO 


Intended Use 


To inform the requester of the state of the TMCS runtime option(s). 
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LT (List Tables) 


acetone oer meumenaaae 
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This command causes TMCS to list the contents of its tables on the site line printer. If a site line printer 
is not available, the SPO is used. 


Example 
DC LT 


Associated Commands 


SO, DEBUG, CHECK 


Intended Use 
To aid in TMCS debugging. 


MX (Diagnose DC Mix) 


MX 


/ ———> (program-name) 
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This message allows the user to interrogate the data comm mix. If the optional <mix> is included, the 
status of the specified task is displayed. Otherwise, the status of all data comm tasks is displayed. This com- 
mand may request internal format responses. The response may consist of multiple messages, therefore the 
user should check for ENDKEY#2 when receiving responses to the MX command. 


FROM TMCS: TASK <mix> / i I: Wie 
ATTI—QUEUE = <Iqn> / Cqueue name >—— 


(A) : 
ATTO—NO. STAS= <n> ”—STATIONS: < Isn >) —/— <Station-name> 

EXECUTING 
SUSPENDED: WAITED ON QUEUE=< Iqn > / <queue-name > 


OL=<n> OC=¢n> 


STATION< Isn > / <station-name> : SL=<n>SC=<n> 


Item 


<mix> 
<program-name> 
ATTI 

<Iqn> 


<queue-name> 


ATTO 
NO.STAS 
<Isn> 


<station-name> 


EXECUTING 
QUEUE 


<Iqn> 
<queue-name> 
OL 


STATION 


<Isn> 
<station-name> 
SL | 

SC 


Command Response Elements 


Meaning 


Logical task number of the user data comm task. 

Program name of the user data comm task. 

User data comm task is attached for input. 

Logical queue number of subnet queue to which the user data comm task is 
attached. 

TNDL defined queue name of subnet queue to which user data comm task is 
attached. 

User data comm task is attached for output. 

Number of stations to which data comm user task 1s attached. 

Logical station number: 0-100 of a station to which data comm user task is 
attached. 

TNDL defined station name, 1-12 alphanumeric characters, of a station to 
which data comm user task 1s attached. 

User data comm task is executing. 

User data comm task is suspended, waiting for a message to be placed on the 
subnet queue. 

Logical queue number (same as above). 

TNDL defined queue name (same as above). 

User data comm task is participating with the TMCS, and is suspended on 
output count (OC) = output limit (OL). 

User data comm task is suspended on station queue count (SC) = station 
queue limit (SL). 

Logical station number of attached station for which SC = SL. 

TNDL defined station name of attached station for which SC = SL. 

Station queue limit. 

Station queue count. 


The internal response format is as follows: 


a es ne <mix> <program-name> <status> ———> 
@000600@ 


Item 


<mix> 


<program name> 


<status> 


Command Response Elements 
Meaning 
1 byte - logical task number of user data comm task 
12 bytes - program name of the user data comm task 


3 bytes - reserved 

1 byte - output limit 

1 byte - output count 

1 byte - trace status 
bit 7 - trace input msg header 
bit 6 - trace input text 


5 - trace input text in hex 
4 - trace output msg header 
3 - trace output text 

2 - trace output text in hex 
1 - reserved 

0 - reserved 


1 byte - transaction queue (Iqn) 

1 byte - communication queue (Iqn) 

2 bytes - logical station number of dummy Mx station 

2 bytes - number of attached stations 

n bytes - attached station (Isn), 2 bytes per attached station 
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Example 


DC MX 
* MX 3 
* MX 2/DCTEST 


Associated Commands 
OL 


Intended Use 


To inform the requester of the status of the requested user data comm task(s). 


NT (No DC Trace) 


NT <mix> 
/ ——»<prog-name> 
QUEVE —»<iIqn> 
Cqueue-name> > / 
STATION —»-<lsn 


<station-name> 
£D1530 


This command may be used to turn off a message trace (see GT). 


Example 
DC NT 3/DCTEST 
DC NT Q 2 
DC NT FILE I1/ 
DC NT S 24 


Associated Commands 
GT 


Intended Use 


To terminate a debug message trace listing. 


NY (Notready A DC Line or Station) 


\ Rriaeinesoane RU 


2 


§ 


NY LINE) —————>-<Iln> 


STATION ———><sn> 


<station-name> 
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This command enables the controlling function to make a line or a station not ready. This command 
may request response in internal format. 


Example 


DC NY L 0 
DC NY S 2 
DC NY TD80 


Associated Commands 


Network status: OL, RY, EI, DI 
Recovery: CL, RE, RY, RD 
Network change: DIALOUT, DISC, RL RS, RD 


Intended Use 


To make a designated line or station logically not ready. This may be done in conjunction with recovery, 
by reloading the DCP, or by redefining a line or station. NY L <lin> may also be entered at DC hardware 
configuration time to tell the TMCS not to automatically ready the specified line and, when a task which is 
the controlling function of the specified line goes to EOJ, to not ready the line. 


If the line is SWITCHED BUSY, the error response, NY INVALID i is displayed. In this case, the TDS 
DISC command -may ‘be. issued to make the line not Teady. 


NOTE 
NY does not cause a SWITCHED CONNECTED line to be DISCONNECTED. 


OL Description or Count 


OL a iain 
LINE 
<lIn> COUNT enol 


STATION 

<Isn> 
<station-name> 
QUEUE 

<Iqn> 
€queue-name> / 
DCP 

<Ipn> 
TERMINAL 

<Itn> 
MODEM 

<imn> 
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If no element (line, station, queue, DCP, terminal, or modem) is specified, a description or count of 
all elements in the SITE NETWORK is displayed. 


If LINE, STATION, QUEUE, DCP, TERMINAL, or MODEM is. specified, but no <IIn>, <Isn>, 
<Iqn>, <Ipn>, <Itn>, or <Imn> is specified, a description or count is displayed for all elements of the 
specified type. This command may request responses in internal format. 


Line Description Response 


FROM TMCS: LINE ¢ lin > : ADDR= <line-address> TYPE=<¢ hex-type> 


@a——— MAX ENT= < max entries) MAX STA= < max stations > 


MODEM2= < Imn> 


STATIONS: — Isn > / <station-name> 
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Command Response Elements 


Item Meaning 
<lin> Logical line number: 0-49. 
<line-address> Physical line address: 0-49. 
<hex-type> 4 hexadecimal digits of line type. See figure 3-1 
<max-entries> Maximum number of stations that can ever be attached to this line 
simultaneously: 1-100. 
<max-stations> Number of stations currently attached to this line: 0-100. 
<Imn> Logical modem number: 0-3 


2 - SUPER -DIRECT CONNECT. 
3 - TA1203 -SWITCHED. 


STATIONS Stations attached to this line. 

<Isn> Logical station number: 0-99; ordered alphabetically by TNDL <station-name> 
(real and dummy). 

<station-name> TNDL defined station name: 1-12 alphanumeric characters. 

<Isn> Logical station number: 0-99; ordered alphabetically by TNDL station name. 

<station-name> TNDL defined station name: 1-12 alphanumeric characters. 


Station Description Response 


@) 


FROM TMCS: STATION < Isn > / < station-name >——»> LINE= < lln > —— TERM2= < Itn > 
@—> MODEM:< Ima > : 


MUO MUI SSB ENI— ROU END=<end-chr > 


DEL= < line-del-chr > BSP= <backspace-chr > WRUBE= < wru-chr > 
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CON= <control-chr > 


(D)—» TYPE= <type> 


FRQ= < frequency > ADR= er > <strng>) 
¢Strng > 


SPEED= <speed> 


© 


SPO LGN WRP WIDTH= <integer 


ak eC aad RETRY= a he QL=<n> = QC=<n> oe 

PAGE= Cinteger> MCSI-IL= ¢n> -IC= ¢n> 

al a aii <n> SC= i NE Te. 
MCSO ATTI-QUEUE= ¢ Iqn > / <queue-name> 


© 


ATTO 
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Item 
<lin> 


<Itn> 


<Imn> 


MUO 

MUI 

SSB 

 ENI 

ROU 

<end-chr> 
<line-det-chr> 
<backspace-chr> 


<wru-chr> 
<control-chr> 


<frequency> 


~ ADR 


(<strng> <strng>) 
<string> 


<type> 
<speed> 
SPO 


LGN 


TASK= <mix)> / < program-name> 


WAITED 


Command Response Elements 


Meaning 
Logical line number, 0-49, of the line to which this station is attached; 255 if 
not attached. 
Logical terminal number of the TNDL terminal description referenced by this 
station. 
Logical modem number: 0-3 
0 - SUPER - DIRECT CONNECT. 
1 - TA1203 - SWITCHED. 
My use output. 
My use input. 
Second stop bit. 
Enable input. 
Route output bit. 
2 - digit hexadecimal end character. 
2 - digit hexadecimal line delete character. 
2 - digit hexadecimal backspace character (additional backspace characters may 
be implemented in the TNDL request set via the TNDL BACKSPACE 
statement). 
2 - digit hexadecimal WRU (Who aRe yoU) character. 
2 - digit hexadecimal control character: 2A (*) by default, but may be altered 
via TDS RS command. 
Polling frequency: 0-255; for every value over 1 causes an additional 1 second 
delay between polls. 
Address (within the terminal). 
2 alphanumeric strings denoting the receive transmit addresses, respectively 
(within the terminal). 
1 alphanumeric character denoting the receive=transmit address (within the 
terminal). 
4 - hexadecimal digits of station TYPE (see figure 3-1). 
4 - hexadecimal digits of station SPEED. See figure 3-2. 
TMCS DATA BIT 15. 
TMCS DATA BIT 14. 
TMCS DATA BIT 13. 
Station’s line width. 
Station’s page size. 
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CON= <control-chr > 


FRQ= < frequency > ADR= aaa > <strng> ) 
<strng > 


oQ—- TYPE= <type> SPEED= <speed> “LoL. IL. IL 
SPO LGN WRP WIDTH= <integer> 
i er RETRY= ~ QL=<n> QC=<n> — 
PAGE= Cinteger> MCSI-IL= <n> -IC= <n> 
i CE ad <n> SC= i i a tila 
MCSO ATTI-QUEUE= <Iqn > / <queue-name> 


© 


ATTO 
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Item 
<Iln> 


<Itn> 


<Imn> 


MUO 

MUI 

SSB 

ENI 

ROU 

<end-chr> 
<tline-det-chr> 
<backspace-chr> 


<wru-chr> 
<control-chr> 


<frequency> 


ADR 
(<strng> <strng>) 


<string> 


<type> 
<speed> 
SPO 


LGN 


TASK= <mix) / <program-name> 


WAITED 


Command Response Elements 


Meaning 
Logical line number, 0-49, of the line to which this station is attached; 255 
not attached. 
Logical terminal number of the TNDL terminal description referenced by th 
station. 
Logical modem number: 0-3 
0 - SUPER - DIRECT CONNECT. 
1 - TA1203 - SWITCHED. 
My use output. 
My use input. 
Second stop bit. 
Enable input. 
Route output bit. 


2 - digit hexadecimal end character. 


2 - digit hexadecimal line delete character. 

2 - digit hexadecimal backspace character (additional backspace characters r 
be implemented in the TNDL request set via the TNDL BACKSPACE 
statement). 

2 - digit hexadecimal WRU (Who aRe yoU) character. 

2 - digit hexadecimal control character: 2A (*) by default, but may be alter 
via TDS RS command. 

Polling frequency: 0-255; for every value over 1! causes an additional 1 seco 
delay between polls. 

Address (within the terminal). 

2 alphanumeric strings denoting the receive transmit addresses, respectively 
(within the terminal). 

1 alphanumeric character denoting the receive=transmit address (within the 
terminal). 

4 - hexadecimal digits of station TYPE (see figure 3-1). 

4 - hexadecimal digits of station SPEED. See figure 3-2. 

TMCS DATA BIT 15. 

TMCS DATA BIT 14. 

TMCS DATA BIT 13. 

Station’s line width. 

Station’s page size. 


Item 
QL/QC 
MCSI 
IL/IC* 
MCSO 
SL/SC 
ATTI 
<iqn> 
<queue-name> 


ATTO 
<mix> 
<program-name> 


WAITED 


Meaning 


Queue limit/queue count for subnet queue to which this station is routed. 
TMCS participates on input. 

Input limit/input count for this station. 

TMCS participates on output. 

Station queue limit/station queue count for this station. 

Attached for input to a user data comm task. 

Logical subnet queue number of queue through which this station is attached. 
TNDL defined queue name: 1-12 alphanumeric characters of queue through 
which this station is attached. 

Attached. for output to a user data comm task. 

Mix number, 1-9, of user data comm task to which this station is attached. 
Program name, 1-12 alphanumeric characters, of user data comm task to 
which this station is attached. 

Indicates that the user data comm task to which this station is attached is 
suspended, waiting for this station’s SL. 


Queue Description Response 


FROM TMCS: QUEUE < Iqn >————_/ < queue-name> ———®  QL= <n>———® QC= «n> 


(A) NO. STAS MAX= Cinteger>——» STATIONS: > ALL 


wt cduwiddndesommeanieacccocoaia: 
ATT-TASK=<mix> / <program-name TE NO. STAS ATT= ¢ 29> 
WAITED 


< isn > / <sta-name > 


aerate 


eae 


STATIONS: ALL ae 


Ox 
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Item 
<Iqn> 


<queue-name> 


QUQC 
NO. STAS MAX 


<Isn> 

ATT 

<mix> 
<program-name> 
WAITED? 

NO. STAS ATI 
STATIONS 
<Isn> 
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OES iy Ser ater ot te 


< Isn > / ¢ station-name > 


Command Response Elements 


Meaning 
Logical queue number, 0-100, based on the alphabetical ordering of the subnet 
queue names. 
The TNDL defined subnet queue name, 1-12 alphanumeric characters, of this 
queue. 
The queue limit/queue count for this queue. 
The number of the stations that could ever be attached simultaneously to a 
user data comm task as part of this subnet queue. 
Logical station number. 
Queue is attached to a user data comm task. 
Mix number, 1-9, of user data comm task to which queue is attached. 
Program name of user data comm task to which queue is attached. 
The user data comm task to which this queue is attached is suspended, 
waiting until a message is placed on this queue. 
The number of stations that are currently attached to a user data comm task 
as part of this subnet queue. 
List of stations that are currently attached to a user data comm task as part 
of this subnet queue. 
Logical station number. 


ee ie ae as eee EEE SSS a a SE IOP Sei aaron i UB Tipetemnn gene pies: san, ee ee 
: age aan UM See | Moree An et BE PRS Soh TERE og eee Beha 


Eeraee 


DCP Description Response 


FROM TMCS: DCP < Ipn >> PROGRAM COUNT:= < n> 


@ 


(A)—»> PROGRAMS= <program-name> : NO. TERMINALS= < n> 


TERMINALS: Itn > 


EDi554 
Command Response Elements 
Item 


Meaning 
DCP Data comm processor. 
<Ipn> Logical processor number: 0-7 


PROGRAM COUNT The number of program files declared for this <lpn> in TNDL: 1, by default, 


namely, NDLDCP. 

List of the program file names (and associated terminals) declared for this 
<Ipn> in TNDL. 

<program-name> TNDL defined program file name. 

NO. TERMINALS Number of terminal types associated with the <program-name>. 
TERMINALS List of TNDL defined terminal types associated with the <program-name>. 


PROGRAMS 


Terminal Description Response 


FROM TMCS: TERM << Itn TT. “owe tLe eet Le ey tl, ODD BCC +. 
-ASYNC CRCI SUM EVEN CRC 


@) 


CASE TRNSP DUPL ONES sania HORZ VERT TR=<ntgr> 


a SYNC= <hex>————»>_ PARM= hex) 
_ sete | RA= <ntgr> 


©-——> TIMEOUT = <ntgr> ———»> TURNAROUNDE < ntgr>————>- ALCP= <nnnn>——>> LCP= <nnnny»——>—(D) 


© 


D)—> RRP= <nnnn> ———> TRP= <nnnn>———— TT P= <nnnn>———>- MAX INPUT= <ntgr> 


© 


(E)——>- ADAPTOR INFO: LiF SZ= aid SYNC Teer 
re 4 XMIT PAR ASYNC EVEN 
a NG Tal NO. BUFFERS: : : <ntgr>————————>- TYPE= < type > > SPEED= <speed» ——>-G) 
RCVE PAR 
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@©—> STPBITS= ¢ stop-bits > 


@) 


PAGE=<ntgr> 
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TA 

RA 

SYNC 

PARM 
TIMEOUT 
<ntgr> 
TURNAROUND 
ALCP 

LCP 

RRP 

TRP 

TIP 

MAX INPUT 
ADAPTOR INFO 
BIN! 

XMIT PAR 
CHAR SZ 
SYNC 
ASYNC 

ODD 

EVEN 

RCVE PAR 
NO.BUFFERS 


<type> 
<speed> 
<stop-bit> 


WRP 
SCR 

BLK 
WID 
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SCR BLK WIDTH= ¢ ntgr > 


LF= <hex HOME=<hex> CLEAR= < hex 


Command Response Elements 


Meaning 


Logical terminal number of a TNDL defined terminal type associated with the 
<program-name>. 

TNDL defined terminal type. 

Logical terminal number. 

Synchronous. 

Asynchronous. 


Summed parity. 

Odd parity. 

Even parity. 

Block check character. 

Cyclic redundancy check. 

Case shift. 

Transparent. 

Full duplex. 

BCC ones. 

No translate. 

Horizontal. 

Vertical. | 
TR-Count: the number of digits to be used in the receive transmit 
transmission number. 

T-AD count: the number of characters to be used in the transmit address. 
R-AD count: the number of characters to be used in the receive address. 
2-digit hexadecimal sync character. 

2-digit hexadecimal parity mask (one bit set for each corresponding data bit). 
The timeout value specified in the TNDL program. 

Integer. 

The TNDL turnaround delay for this terminal. 

4-digit hexadecimal! auxiliary line control pointer. 

4-digit hexadecimal line control pointer. 

4-digit hexadecimal receive request pointer. 

4-digit hexadecimal transmit request pointer. 

4-digit hexadecimal translation table pointer. 

The size in bytes of the largest message that can be input from this terminal. 
Information used by the data comm firmware to condition the hardware. 
Binary 1. 

Transmit parity. 

Character size: 5-8 BITS. 

Synchronous. 

Asynchronous. 

Odd parity. 

Even parity. 

Receive parity. 

The number of data comm buffers needed to hold a message (header + text) 
for this terminal. 

4 hexadecimal! digits of terminal TYPE. (See figure 3-1). 

4 hexadecimal digits of terminal SPEED. See figure 3-2. 

4 hexadecimal digits of stop bit info (one bit per SPEED if set; then 2 stop 
bits used for corresponding speed. 

TMXS DATA BIT 13 - WRAPAROUND 

TMCS DATA BIT 12 - SCREEN 

TMCS DATA BIT Il - BLOCKED 

TNDL defined terminal width. 


Meaning 
TNDL defined terminal page size. 


TNDL defined carriage return character. 


TNDL defined line feed character. 
TNDL defined home character. 
TNDL defined clear character. 


Modem Description Response 


FROM TMCS: 


MODEM—< Imn >—-TYPE = <hex > — SPEED = — <hex> —NOISE DELAY =—{A) 
(A) integer — XMIT DELAY = < hex > > 


Command Response Elements 


Item Meaning 

<Imn> Logical modem number. 

TYPE 4 hexadecimal digits of modem TYPE 
SPEED 4 hexadecimal digits of modem SPEED 
NOISE DELAY TNDL defined noise delay for this modem. 
XMIT DELAY TNDL defined transmit delay for this modem. 


Line Count Response 


FROM TMCS: TOTAL LINES = <integer> 
Station Count Response 


FROM TMCS: TOTAL LINES = <integer> 


DCP Count Response 

FROM TMCS: TOTAL DCPS = <integer> 

Queue Count Response 

FROM TMCS: TOTAL QUEUES = <integer> 
Terminal Count Response 

FROM TMCS: TOTAL TERMINALS = <integer> 
Modem Count Response 


FROM TMCS: TOTAL MODEMS = <integer> 


Examples 
DC OL D * OL Q3D 
DC OL C * OL FILE1/D 
DC OL L D DC OL DCP D 
DC OLLOD * OL DCP OD 
DC OL S D DC OL T D 
* OL D 14D DC OL TO D 
DC OL TD7A DC OL M D 
* OL QD DC OL M 1D 
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Associated Commands 


OL (status), RX, RY, NY, El, DI 


Intended Use 


To return the count or description of the requested network element(s) to the requester. 


Line 
Bit Type 
15 Special 
14 Bits 
13 BDI 
12 TELEX 
11 STANDBYTRUE 
10 STANDBY OPTION 
9 LOW/HIGHRATE 
8 RATESELECT 
7 MODEM 
6 DISCONNECTONLOC 
5 LINEPAUSE/ACU 
4 DIALOUT 
3 DIALIN 
2 ASCII/ 
EBCDICSYNC 
j ASYNCHRONOUS 
0 FULLDUPLEX 
Asynchronous 
Bit (Baud) 
15 Reserved 
14 38,400 
13 19,200 
12 9,600 
11 4,800 
10 2,400 
9 | 1,800 
8 1,200 
7 600 
6 300 
5 200 
4 150 
3 — 110 
2 100 
1 sis, 
0 50 
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Station 
Type 


Special 
Bits 

BDI 
TELEX 
Reserved 
Reserved 
Reserved 
Reserved 
MODEM 
Reserved 
Reserved 
Reserved 
Reserved 
ASCH / 


EBCDICS YNC 
ASYNCHRONOUS 
FULLDUPLEX 


Terminal Modem 
Type Type 
Special Special 
Bits Reserved 
BDI Reserved 
TELEX Reserved 
Reserved Reserved 
Reserved STANDBYOPTION 
Reserved Reserved 
Reserved RATESELECT 
Reserved MODEM | 
Reserved DISCONNECTONLOC 
Reserved _ ANSWERTONENEEDED 
Reserved DIALOUT 
Reserved DIALIN 
ASCII/ Reserved 
EBCDICSYNC 
ASYNCHRONOUS ASYNCHRONOUS 
FULLDUPLEX 


FULLDUPLEX 


Figure 3-1. TNDL Type Fields 


Synchronous 


Figure 3-2. Speed Fields 


(Baud) 


Reserved 
Reserved 
Reserved 
Reserved 
Reserved 


Reserved | 
Reserved » 


Reserved 
9,600 
7,200 
4,800 
3,600 
2,400 
2,000 
1,200 

600 


4-DIGITS: indicates the frequency to be used for this station. 


NOTE: 


terminal, or modem. Valid speeds are listed above 
by bit-position, where bit 15 is the most significant 
(left most) bit of the field. 


The bits take on different meanings for synchronous and 
asynchronous speeds. Also, for synchronous terminals, 
only one bit indicating the maximum speed may be 

set; in all other cases, multiple bits may be set. 


Baud = Bits per second 


OL (REQUEST DC Line and/or Station, and/or Queue, and/or DCP 
STATUS) 


OL 

LINE 

<Iln> 
STATION 

<Isn> 
<station-name > 
QUEUE 

<Iqn> 
<queue-name>) / 
DCP 

<Ipn> 
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If no line or station, or queue or DCP is specified, the status is displayed for all lines and stations, 
and for all queues and DCP’s. 


IF line or station, or queue or DCP is specified, and no <IIn> or <Isn>, or <Iqn> or <Ipn> is 
specified, the status is displayed for all lines or all stations, or for all queues or all DCP’s respectively. 


If LINE<IIn> or STATION<Isn>, or QUEUE<Iqn> or DCP<Ipn>, or <station-name> or <queue- 
name> is entered, the status of the specified line, or station or queue, or DCP is displayed. This command 
may request responses in internal format. 


Line Status Response 


FROM TMCS: LINE ¢ Un > : ADDR= <line-address > rs Cs 5 ee Sah 
| ail , 
LBSY -WBSY LXE HIGH LRDY- + , sccuaean | 
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Command Response Elements 


Item Meaning 
<lin> Logical line number: 0-49 
<line-address> Physical line address: 0-49 
YBSY Auxiliary line busy. 
YQED Auxiliary line queued. 
LBSY Line busy. 

WBSY Switched busy. 
LXED Line connected. 
HIGH HIGH RATE. 
LRDY Line ready. 
STBY Stand by. 
LQED Line queued. 
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Station Status Response 


FROM TMCS: STATION < Isn > / <station-name>————_ LINE= ¢ In > 


® 


” Trypy tema d le arcutlvgotl owes ncamm cue, 

RD QED MCSI: IC=<ntgr>— IL=<ntgr> 

SC= <ntgr>———— SL= cid TE Mi 
ATTI-QUEUE=< Ign > / <queue-name> 


M 


© 


ATTO 


—01557 


Item 


<Isn> 


<station-name> 
<lin> 

RDY 

ENAI 

ATCH 

QED 


QL/QC 
MSCI 
IL/IC 
MCSO 
SL/SC 
ATTI 
<iqn> 


<queue-name> 


ATTO 
<mix> 


<program-name> 
WAITED 
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TASK= <(mix>-——> / ——~- program-name> 


WAITED 


Command Response Elements 


Meaning 


Logical station number: 1-99, denoting the alphabetical ordering of the 
<station-name>s. 

NDL defined station name: 1-12 alphanumeric characters. 

Logical line number: 0-49, or 255 - station not attached. 

Station is logically ready. 

Station is enabled for input 

Station is attached to a line. | 

Station is queued: one or more output operations are queued up for this 
station. 

Queue limit/queue count for subnet queue to which station is routed. 
TMCS participates on input. 

Input limit/input count for this station. 

TMCS participates on output. 

Station queue limit/station queue count for this station. 

Station attached to a user data comm task for input. 

Logical queue number of the subnet queue through which this station is 
attached. 

TNDL defined name of the subnet queue through which this station is 
attached. 

Station attached to a user data comm task for output. 

Logical task number of the user data comm task to which this station Is 
attached. 

Program name of the user data comm task to which this station is attached. 
The user data comm task to which this station is attached is suspended, 
waiting for SC = SL. 


Queue Status Response 


FROM TMCS: QUEUE < Iqn > = /——<queue-name>——_ QL= ¢ n) ——— AC= nd 


@) 


oo <mix> ——> /—s< program-name > a ne eee. 
ENB WAITED 


(©———»> NO. STAS ATT= <n> —————» STATIONS: ALL 


< Isn > / 2 stationname>— 


E01558 


Command Response Elements 


— Meaning 

<Iqn> Logical queue number: 0-255, denoting the alphabetical ordering of the 
<station-name>. 

<station-name> TNDL defined station name: 1-12 alphanumeric characters. 

QL/QC Queue limit/queue count for this queue. 

ATT Queue attached to a user data comm task. 

<mix> Logical task number of user data comm task to which this queue is attached. 

<program-name> Program name of user data comm task to which this queue is attached. 

WAITED User data comm task to which this queue is attached is suspended, waiting 
for a message to be placed on this queue. 

NO.STAS ATT Number of stations currently attached to a user data comm task as part of 
this queue. 

STATIONS List of stations that are currently attached to a user data comm task as part 
of this queue. 

<Isn> Logical station number. 

<station-name> TNDL defined station name. 


DCP Status Response 


FROM TMCS: DCP < Ipn > 


IDLE PROGRAMG= < program-name > 
E01589 
| Command Response Elements 
Item Meaning 
<Ipn> Logical processor number of this DCP: 0,1 
IDLE All of the lines on this DCP are logically not ready. 
<program-name> The program file name of program currently loaded in this DCP. 
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Example 
DC OL 
DC OL L 
DC OL LO 
* OLS 
DC OL S 14 
* OL TD7A 
DC OL Q 
DC OL Q 3 
* OL FILE! 
DC OL DCP 
DC OL DCP 
DC OL DCP 0 


Associated Commands 
OL C, OL D, MX, RY, NY, EI, DI, RD, RL, RS 


Intended Use 


' To inform the requester of the status of the requested network element(s). 


PL (Program Load) 


PL ae RE les 
disk-id> / <queue-name> / / NOACK —~<text> 


NEW/ . 


<sta.-name> 
ED1534 . 


The data comm program load statement works like the data comm RN statement except that it switches 
the terminal from data comm (DC) mode to data entry (DE) mode and queues an initiating message of PL 
instead of RN. This command is only valid for B9347 terminals. — 


Example 


* PL DDE.PGN.27 
DC PL SNTEST B93A 


Associated Commands 
AT, DT, EX, RN 


Intended Use 


To enable the user to mitiate and become attached to his own copy of the specified DDE program. 


PR (Assign Priority) 


PR A 
<mix >> —————>-_ / ———- (program-name > B 
STATION —— <lIsn> / <station-name> Cc 
ED1535 D 


This statement allows the user to assign a priority to a specified (or implied) data comm task. 


If a <mix-no>/<program-name> is specified and the PR message is entered from a terminal, the task 
must also have been initiated from that terminal. 


If <station-name> is specified, the priority class of the indicated terminal(s) is assigned as specified. 
Whenever a data comm task is initiated from a terminal, the priority class of the terminal is assigned to the 
task. The default priority class of a terminal is D (allowing program to be assigned its default priority). 


If PR alone is specified, the PR message must have been entered from a terminal. It assigns the priority 
class of that terminal, only. 


Example 


DC PR 2/DCTEST B 

DC PR 3/DDE.PGM.27 C 
DC PR S 24/TD830XA D 
*PR A 


Associated Commands 
MX,OL 


Intended Use 


To enable an operator to assign task priority on a task/terminal basis, as required, to satisfy the various 
demands on the system. 


RD (Reload DCP) 


<Ipn> < program-name)> 


ED1536 


This statement allows the user to reload the specified DCP with the specified program. If the optional 
parameters are not entered, the standard data comm firmware is reloaded into DCP 0. 


Example 
DC RD 
DC RD 0 
DC RD NDLPROG 
DC RD 0 NDLPROG 


Associated Commands 
CONF, END, RL, RS, DIALOUT, DISC 


Intended Use 
To load the DCP with a non-interpretive TNDL program. 
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RE (Recall Unprocessed Messages from Specified Queue) 


RECALL STATION « Isn> 
<station-name> TO STATION c Isn > 
QUEUE < Iqn> <station-name> TOPq 
<queue-name  /| QUEUE < Iqn > 
<queue-name > 


ED1547 
LP 


This command allows the user to recall unprocessed messages currently on the specified station or 
subnet queue and print them on the line printer, or reroute them to the specified destination station or subnet 
queue. If the messages are rerouted, they may be TOP-Queued on the destination station or subnet queue. 


If no destination is specified, the messages are returned to the requesting task, terminal, or SPO. 


For each message recalled, if the SPO or line printer is its destination, two messages are generated. 
One message is a leader which identifies the location from which the message following it was recalled; the 
next is the actual recalled message. If a recall is issued for a station, that station must be attached to a line. 


If the message is destined for a subnet or station queue, and has never been recalled before, a request 
is made for space to house the message text plus a 48-byte leader message. If the space is available, the leader 
and text are forwarded as a single new message, and the old message space is released. If there is not enough 
space for both leader and text, byte 46 of the leader is set to ‘‘*’’. If the message contains more than 48 
bytes of text, the right-most 48 bytes are saved. The remaining bytes are shifted to the mght by 48 bytes, 
then prefixed by the 48-byte leader. 


If 96 bytes of space are available, two messages are returned: 
1. The first (n-48) bytes of the (n)-bytes-long message, prefixed by the 48-byte leader (ENDKEY=2). 
2. The right-most 48 bytes of the message text, prefixed by the 48-byte leader (ENDKEY=3). 


If 48 bytes of space are not available, message 1 is returned as above. Message 2, however, is displayed 
on the SPO. (In this case, message 1 has ENDKEY=3). 


If the message contains less than 48 bytes of text, a complete leader is returned to the user if 48 bytes 
of message space are available; otherwise, as much leader as will fit in the available space is returned. In 
either case, the message leader and text are displayed on the SPO with an asterisk in column 46. 


Messages which have been recalled before are forwarded to the user after the old leader has been over- 
written by the new one. ‘ 
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Recall Responses 
FROM TMCS: —%% oe ein <Isn>/<sta-name> RE OK — %% 
QUEUE <lgn>/<q-name> _ 


FROM TMCS:—%%— TT STATION <lsn eee Yi RE-COMPLETE-%% 
QUEUE <Iqn>/<q-name> 


FROM TMCS: 


%% a as MSGS-RECALLED- 
NO 


FROM TMCS: 


Wo% <12 byte-sta-name> * RECALLED FROM ~T an a 
Q <Iqn>/<q-name> 


@ 00 @ <35 byte msg hdr> 


= <recalled message text> 4 


NOTES: 1. <12 byte sta-name> = 
NAME OF STATION 
WHOSE <lIsn> IS IN THE 
MSG HDR. 
2. MAY BE BLANK FILLED 
(AFTER COLON) TO 48 
BYTES IF NECESSARY. 


Example 


DC RE S 0 

DC RE TD7A TO TD7A/ 

DC RECALL QUEUE 3 TO Q4 
DC RE FILE1/ TO FILE2/ 


Associated Commands 
CL, RY, NY, RD, EI, DI 


Intended Use 


To recover the messages on a station or subnet queue in conjunction with task level or line/station level 
recovery. : 
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RL (Redefine Line) 


mat Lanne tow it 
TYPE=@ nnnn @ MODEM= <Imn> RY 


—D1548 


This command allows the user to redefine the specified lines <type> and/or <modem> fields. The en- 
tire field must be specified; fields which are not specified are not altered. 


If RY is not specified, the line is left in the not ready state. 


Command Response Elements 


Item : Meaning 
<lin> Logical line number, 0-3, of line to be redefined. 
TYPE (figure 3-1) as follows: 


STANDBY TRUE _ BIT 11 


STANDBY BIT 10 
OPTION 

LOW OR HIGH BIT 9 
RATE 

RATE SELECT BIT 8 
CAPABILITY 

LOSS OF BIT 6 


CARRIER ACTION 
LINE PULSE/ACU BIT 5 


DIALOUT BIT 4 
CAPABILITY 

DIALIN BIT 3 
CAPABILITY 

ASCIVEBCDIC BIT 2 
SYNC 

ASYNCHRONOUS BIT 1 

RY Leave the line in a READY state following the redefine line. 


The following table indicates results of specific examples: 


Example Result 
DC RL 0 | No change. 
DC RL OT = @020@ Select high rate. 
DC RLOM = 1 | : Switch to MODEM 1. 
= 0 RY Switch to MODEM 0 (DIRECT), and leave the line READY. 


DC RL OM 


Associated Commands 
CONF, END, RD, RS, DIALOUT, DISC 


Intended Use 


To change the characteristics of a line, which has been altered: 
1. Select HIGH/LOW rate. 
2. Switch MODEM, such as, SUPER (Dummy modem for direct connect) with TA1203. 
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RN (Run Program) 


Oo oe 
<disk-id <queue-name) / | NOACK text 


NEW/ . 


£D1537 ¢ Sta-name > 


The DC run statement works like the DC execute statement (refer to EX), with four exceptions: 

1. A new copy of the requested program is always started up. 

2. Another terminal other than the terminal(s) included in the initiating message can never become at- 
tached to this task, therefore, at least one real station must be implied or specified. 

3. If the <queue-name> is not specified, the initiating terminal station-unique subnet <queue-name> 
fa celected (ir available). am aah gann ale. aie | 

4. An initiating message of *RN is queued on the user subnet queue. 


Example 


* RN DCTEST 
DC RN DCTEST TD7 
DC RN TDSPACK/CMSCANDE TD8A USER TEXT 


RO (Reset Option) 


RO 


<allowable-option —— oe 


ED1538 


This command allows the user to reset the TMCS runtime options. The options may be set and tested 
via the SO and LO commands, respectively. <Allowable-option>s are defined under the SO command. 


Example 


DC RO DEBUG 
DC RO 1 


Associated Commands 
LO, SO 


Intended Use 
To allow the operator to reset the TMCS run-time options. 
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RS (Redefine Station) 


RS —> <\Isn> / <station-name> 


SSB = Y ENI a , END = <str> DEL = <str> 
0 0 | 


BSP = ¢str> WRU = <Cstr> CON = <str> FRQ = <nn> 


ADR = Toe , <string> ) TYPE= < type> 
< string > 
SPEED = <speed> MODEM = <Imn> TERM =<itn> RETRY = <n> RY 


s menienmmianrameinerceaiterer al 


ED1539 


This statement allows the user to redefine the specified station’s redefinable fields. 
Only those fields for which optional information is specified are modified. 
Setting the LLN=255 moves the station off the line. 


If two addresses are specified, for example, ADR=(<string>,<string>), the leftmost <string> is the 
receive address, and the rightmost <string> is the transmit address. 


If RY is specified, the station is left in the READY state. If a station is not on a line, or is not being 
moved onto a line, no changes take place. 


‘ Command Response Elements 


Item Meaning 
<Isn> Logical station number of station to be redefined. 
<station-name> TNDL defined. Station name of station to be redefined. 
LLN Logical line number to which station is to be assigned: 0-89 or 255 (no line). 
MUO My use output. 
MUI My use input. 
SSB Second stop bit. 
ENI Enable input. 
END END character. 
DEL DELETE character. 
BSP BACKSPACE character. 
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Meaning 


WRU Who aRe yoU character. 
CON CONTROL character. 
FRQ Station FREQUENCY. 
ADR Station ADDRESS. 
(<string> <string>) (Receive address, transmit address). 
<string> Receive = transmit address. 
<type> Four hex digits of station TYPE are as follows: 
BDI mode Bit 13 
Telex Bit 12 
Modem Bit 7 
ASCII/EBCDIC Bit 2 
sync 
Asyn/sync Bit 1 
<speed> For digits of station SPEED (see figure 3-2). 
<Imn> Logical modem number: 
2 - SUPER 
3 - TA 1203 
4-TA 1203x4 
<Itn> Logical terminal number. 
RETry Station RETRY count: 10 by default. | 
NY Leave the station in a NOT READY state following the redefine station. 
The following table indicates results of specific examples: 
Example Result 
DC RS 14/TC4A LLN=255 | Move TD7A off line. 
DC RS 15/TC48 CON=@2A@ Assign station control character of *. 
DC RSi5/TC4D CON=“' Assign station control character of *. 


Associated Commands 


CONF, END, RL, RD, DIALOUT, DISC 


Intended Use 


To allow those characteristics of a station that may be altered to be altered, in particular, <lin> (moving 
a Station off line/on line, CON (redefining station control character, and SPEED (changing the station speed). 


RY (Ready A DC Line or Station) 


RY LINE —— <lln> 
STATION —<isn> 


<station-name > 
E01840 


This command enables the controlling function to make a line or station ready. Normally, stations and 
lines are made ready by the TMCS at initialization time, and at queue or station attachment time. (To make 
a line or station not ready, see NY.) This command can request responses in internal format. 


Example 
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Associated Commands 


Network Status: OL NY EI DI 

Neiwork Recovery: CL RE NY RD 

Network Change: DIALOUT DISC RL RS RD 
Intended Use 


To make a designated line or station logically ready. This may be done in conjunction with a network 
status change, network recovery, or a network change (such as reloading the DCP). 


If the line is SWITCHED BUSY, the error response, RY INVALID, is replaced. 
If the line is DIALIN capable, it is enabled for DIALIN at this time. 


SET (Set Limit) 


SET | IL ——<I52 > | — <station-name> <integer) >] 
OL <mixo——_ | — <program-name> 
QL—————>(Iqn>-—— | ——  <queue-name > 
SL -——____->--<Isn >——_ / — <station-name > 


ED1541 


This statement allows the controlling function to set the specified limit to the specified value, where 
value is an integer from 1 to 255 inclusive. 


The functions of each of the types of limits are described under the enquire limit command (see ENQ). 


Example 


DC SET IL 2/B93C 5 

DC SET OL 3/DDE.PGM.27 7 
DC SET QL 3/FILE1 10 

DC SET SL 14/TC4A 1 


Associated Commands 
ENQ 


Intended Use 


To enable the SPO operator or task to adjust the limits which control the number of messages that may 
be queued at one time: 


1. From a given participating terminal to the TMCS (IL). 

2. From a given participating task to the TMCS (OL). 

3. From non-participating terminals to a given queue (QL). 
4. From a non-participating task to a given terminal (SL). 
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SO (Set Option) 


SO 1 
PRINT ALL INCOMING DATA COMM 
DEBUG MESSAGE HEADERS ON LP. 
2 NOT IMPLEMENTED. 
RECOV 
3 PRINT DATA COMM EVENTS AND 
TMCS INTERNAL INFO ON LP. 
CHECK 
4 ENABLE TMCS EVENT LOG. 
EVLOG 
5 ENABLE TMCS ERROR LOG. 
ERLOG== 
6 =o ENABLE TMCS CONTROL LOG. 
COLOG 
7 DISPLAY/ACCEPT IN RESPONSE TO 
VALID ATTACH QUEUE/ATTACH 
ALLOW STATION REQUESTS. 
8 CAUSE NEW INTERFACE TO BE 
INVOKED ON SPECIFIED BASIS. 
SHIFT (NOT OPTIONAL AFTER 1.1 TDS 
ae RELEASE) 
RN 
PL 


<prog.-name> 


This command allows the user to set the TMCS runtime options. The options may be reset and tested 
via the RO and LO commands, respectively. 


The SHIFT option may be set on a program-name basis; a TDS command (EX, RN, PL) basis; or a 
global basis. The setting of the SHIFT option has the following effect on all TMCS control messages placed 
on the transaction queue (TQ) of a user data comm task: 

1. The text portion of the message is shifted left by 12 bytes; what was previously in byte 1 is in byte 

13. 

. The first 12 bytes of input text contain the relevant station name, blank-filled on the right. The station 
name was previously in the symbolic-source field of the input CD. 

. The symbolic source field of the input CD now contains the name MCS. 

. The text-length field of the input CD contains a value which is 12 greater than it previously contained 
for the corresponding message. 


> Ww bho 


An example is the sign-on message from TD830XA: 


Option Reset Option Set 
Symbolic source TD830XA MCS 
Text length 3 15 
Input text *EX TD830XAPObYY*EX 
Example 
DC SO CHECK 
DC SO 3 
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Associated Commands 
LO,RO 


Intended Use 


To allow the operator to SET the TMCS runtime options. 


STOPTEST (Stop Test) 


STOPTEST 


ALL 


_[ 
Stations <Isn> 


<station-name> 
ED1561 


> 


This command allows the user to selectively terminate testing that was initiated via a TDS TEST com- 
mand. 


If the STOPTEST command is entered from a terminal, it affects only that terminal, and the optional 
ALL,‘‘/’’, or station list may not be specified. 


ALL, ‘‘/’’, or a station list must be specified if the STOPTEST command is entered from a SPO or 
task. 


Examples 


DC STOPTEST ALL 
*STOPTEST 
DC STOPTEST TD8= 


Associated Command 
TEST 


Intended Use 
To stop testing that was previously initiated using the TDS TEST command. 


TERM (Terminate TMCS) 


i Cis sail 
FAST 


This command allows the user to initiate an orderly termination of TMCS. Files are closed in an orderly 
manner, and information stored for later processing. 
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If TERM alone is entered, and no user data comm tasks are running, TMCS: 
1. Notifies the SPO and all ready terminals that TMCS is terminating. 
2. Cleans up and goes to EOJ. 


If TERM alone is entered and one or more user data comm tasks are running, TCMS queues a 
*TERMINATE message on the transaction queue of each attached task, and waits until all user data comm 
tasks have gone to EOJ. During this time, the user data comm tasks already attached may perform as usual, 
but no new ones may start. TMCS performs the following as soon as the last task goes to EOJ: 

1. Notifies the SPO and all ready stations that TMCS is terminating. 

2. Cleans up and goes to EOJ. 


If FAST is specified, TMCS: 

1. Disables input from all stations. 

2. Detaches subnet queues as they become empty. 

3. Notifies the SPO and all ready terthinals that TMCS is terminating. 
4. Cleans up and goes to EOJ. 


Examples 


DC TERM 
DC TERM FAST 
DC TERMINATE 


Intended use: 


To cause orderly termination of the data comm subsystem, TMCS, and associated user data comm 
tasks. 


TEST (Test Specified Station) 


TEST : <n i ‘ 
ALL : WRAP <integer> — <text> 


LT 3 ‘BURST —<integer> ; 
Station <Isn> - 


9 


<station-name> 


ED1562 j 


This command allows the user to send canned or operator supplied test patterns continuously or a 
specified number of times to either an implied station or to one or more specified stations. 


$ 


If the TEST command is entered from a terminal, it implies that terminal only, and the optional ‘ALL’, 
‘/‘, or station list may not be specified. 


If ALL or ‘/‘ is specified, all stations not attached to user tasks will be tested. Otherwise, the specified 
(or implied) station(s) that are not attached to a user task will be tested. 


If BURST is specified, the test message will be sent <integer> times to each station in the order 
specified. 


If the TEST command is entered from a terminal, the WRAP option may not be specified. Otherwise, 
if the WRAP option is specified, the test message will be transmitted to one station only at a time. Each time 
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a successful result is returned, the message will be sent to the next station according to the specified order. 
be sent to the next station according to the specified order. If <integer> 1s specified, the test will continue 
until the test pattern has been sent to all stations <integer> times. If <integer> is not specified, the test will 
continue indefinitely. If a STOPTEST command is issued for a station, or if the station becomes attached to 
a user task, it will be removed from the list. The sequence will be broken when an unsuccessful transmission 
is encountered, or when there are not more stations in the list. 


If neither BURST nor WRAP is specified, a repeat mode will be assumed in which the test pattern is 
simultaneously sent to all stations in the list. If <integer> is specified, each time a good result is returned 
from a station, the message will be sent to that station again until it has been sent <integer> times. If <inte- 
ger> is not specified, each time a good result is returned, the message will be sent to that station again. The 
Sequence will be broken for a given station when an unsuccessful transmission is encountered, or a STOP- 
TEST command ts issued for the station, or the station becomes attached to a user task. 


A canned message may be selected by entering #<integer>, interpreted as follows: 
#1 = “‘U...U”’’ Screen width characters - BIT pattern 01010101 (ASYNC) 


#2 = ‘‘**...* Screen width characters - BIT pattern 10101010 (ASYNC) 
#3 = ‘‘@2021...7F@’’ 96 displayable characters 
#4 = ‘‘THE QUICK BROWN FOX JUMPED OVER THE LAZY DOG.”’ 48 characters 


#5 = ‘‘The quick brown fox jumped over the lazy dog.’’ 48 characters 


If a canned pattern is not selected, <text> must be specified. 
Example 

DC TEST S 0, 1, 2, 14 W 7 ABCDEFG 

DC TEST TD7ABC, TD8= BURST #2 

DC TEST STATIONS 0, 1, 2; WRAP 3: ABCDEFG 


Associated Commands 
LT, TO 


Intended Use 


To provide the operator with a means of easily and quickly establishing confidence in terminals which 
are not currently attached to a user data comm task. 


TO (Broadcast Text To Specified Destination) 


ALL <text>— 


7 TOPQ 


: 
STATIONS Vom 


7 


station-name 


SPO 


This statement allows the user to send a message from the SPO or from a terminal to the SPO, to ALL 
or specified station(s), or from the SPO to the specified task. When ALL is specified, the message is trans- 
ferred to all ready stations which are not attached to a user task. 


<Text> may be a string of displayable characters not to exceed 180 characters in length. 
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Example 
DC TO ALL A GOOD MORNING 
* TO SPO: HELP 
DC TO S 0, 1, 2 TOP ## TESTING, 1, 2, 3, 4 #K 
DC TO TD7= TOPQ: ## PLEASE SIGN ON##4 
DC 2 WRU 
DC TO MX 2 WRU 


Associated Commands 
LT, TEST 


Intended Use 


To provide a mechanism for a quick GO/NO GO check of the terminal interface, and to provide a means 
of communication between the SPO and terminal operators. 


WMI (WHO AM 1) 


WMI 
STATION <lIsn> 
32 <station-name> 
QUEUE <lgn> 


<queue-name> / 


¢mix> 


£01545 
This command informs a user of the name and <Isn> by which his terminal is known to the system. 


Example 


DC WMI 
* WMI 


Associated Commands 
WRU 


Intended Use 


To inform the user of the name by which he is known to the system. 


WRU (WHO ARE YOU) 


RA cuca aicntints eemeananoutiecnnntcetiesotu 


ED1546 


This command lets the user determine the MCS name revision level. 


Example 
DC WRU 
* WRU 


Associated Commands 
WMI 
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Intended Use 


To inform the user of the name and release level of the MCS. 


ZIP (ZIP SCL Execute Command) 


Let Gina en WMO 3a 
EX disk-id >—/ text 


This command allows the user to execute a specified (non-user data comm) program and to receive a 
notification of the ZIPped program’s termination when it occurs. 


ED1544 


Attempting to ZIP any SCL statement other than EX (or implied EX) causes an error. 


For a valid ZIP request, the following occurs: 

1. TMCS attempts to ZIP a program called TDS.ZIP. 

2. Program TDS.ZIP then ZIPs the specified program with PAUSE. 

3. A result is returned, depending upon whether TMCS was successful in Z1Pping program TDS.ZIP: 
If the ZIP succeeded, a good result (CQ) is returned. 
If unsuccessful, an error result is returned. 


If program TDS.ZIP is successfully ZIPped, but encounters a fetch value error when attempting to ZIP 
<program-name>, an error is returned to the requestor by TDS.ZIP. If no such fetch value error is encoun- 
tered, TDS.ZIP returns a COMPLETE message as soon as it resumes, ( after <program-name> has gone to 
EOJ). TDS.ZIPs itself and goes to EOJ. 


NOTE 
The ZIP fetch value is returned in the COMPLETED message, for user evaluation, 
even when byte 0 = @00@. Program TDS.ZIP does not presume to know whether 
the <program-name> it ZIPped has performed its task successfully. 


Examples | 
*ZIP RM OLDFILE 
*ZIP CH NEWFILE TO OLDFILE 


Intended use: 


To permit a user at a terminal to execute a non-user data comm task. 
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SECTION 4 
TDS USER PROGRAMMING 
CONSIDERATIONS 


GENERAL 


This section identifies the features, restrictions, and conventions of the TDS-user task interface for the 
user data comm programmer. With this information, the user can design, code, debug, and implement a work- 
ing data comm system with a minimum of programming effort. 


BASIC FEATURES 


The TDS-task interface uses the standard user data comm statements, that is, only simple send and re- 
ceive statements are required and no opens or closes are required. The designing and coding of a user data 
comm task can be done independently of the actual network since the program refers only to input and output 
CD’s. Subnet queues are assigned at job initiation time and a station-name is associated with each transaction. 
The terminal type in use may be identified on a transaction by transaction basis via the station naming conven- 
tions. 


BASIC RESTRICTIONS 


Certain restrictions are imposed upon the user data comm task so that a generalized, flexible interface 
can be used. The user task must have one initial input DC (COBOL) or an INIT.MSG segment (MPLII) and 
one output CD. Only one transaction queue is used per task (that associates with the input CD). A unique 
communicate queue (CQ) is also assigned to each user data comm task. Its only use is to receive immediate 
responses to requests that were sent to TMCS via the SEND to MCS mechanism. After sending a TDS com- 
mand to TMCS, the user task should do. one or more receives (until ENDKEY # 2) from its communicate 
queue (CQ). The first three bytes are always a fetch value. Refer to Section 2 for a discussion of fetch values. 


If a task never sends a TDS command to TMCS, it does not concern itself with the CQ. A queue cannot 
be shared simultaneously across tasks. A terminal cannot be shared simultaneously across tasks (a terminal 
must detach from one task before attaching to another task). A terminal cannot be split across tasks (that is, 
the keyboard input and display output must be associated as a unit with the same task). | 


COBOL INTERFACE 


Each COBOL user data comm program must declare an initial input communication description (CD), 
and an output CD. The RECEIVE and ACCEPT MESSAGE COUNT statements may be used in conjunction 
with the initial input CD, and SEND may be used in conjunction with the output CD. 


Initial Input CD 


The user data comm task must move SPACES to the symbolic subqueue fields of the initial input CD 
as part of initialization. Subsequently, the user can initiate a RECEIVE statement referencing the initial input 
CD by name. When a message is received, the appropriate fields of the initial input CD are filled in by the 
System. 


When a COBOL user data comm task begins, the first 12 characters (symbolic queue field) of its initial 
input CD contain the user’s transaction queue (TQ) name. The next 12 characters (symbolic subqueue field 
1) contain the user communicate queue (CQ) name. The third 12-character group (symbolic subqueue field 2) 
contains the name of the dummy station assigned to the task. The user task should save its CQ name prior 
to space-filling the sub-queue field only if it intends to send messages to TMCS via the SEND to MCS 
mechanism. 


The status key should be checked first to see if a good message was received. If it was, the first charac- 
ter of message text should be examined to see if a control (*) message was just received. 
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The 1.0 TMCS release placed the control message as the first three bytes of the message and the sym- 
bolic source field contained the station name of the requesting station. The 1.1 TMCS release has this format 
as the standard interface; however, as an option, the station name is placed first in the message, immediately 
foiiowed by the control message. The symbolic source field contains the value MCS. This optional method 
is invoked by a TMCS option, SHIFT, which may be set for all types of program execution requests (EX, 
RN, PL) or for specified programs. (See the SO command in Section 3 for more details.) Releases subsequent 
to 1.1 will have this optional format as standard and will no longer support the 1.0 format. The user should, 
therefore, take this into consideration when designing user data tasks interfacing with TMCS. 


The control message received will be a signon message, a signoff message, or a recalled message. For 
a recalled message, the actual text is preceded by a 36-byte header of the form 


*RECALLED FROM 5 24 TD830XA:. 


Recalled messages are always of the format described as optional for 1.1 regardless of the setting of 
the SHIFT option. 


The first three bytes of the control message, then, indicate the type of message received as follows: 
*AT - terminal signed on via AT command. 

*EX - terminal signed on via EX command. 

*RN - terminal signed on via RN command. 

*PL - terminal signed on via PL command. 

*DT - terminal signed off via DT command. 

*TE - TMCS is terminating. 

*RE - the text message in the queue was recalled from the indicated station or subnet queue. 
*EQ - the executed task queue has been enabled. 

*AQ - the executed task queue has been attached. 

*VA - the last or only station has signed off (queue is vacant). 

*DTEOJ - the attached task has gone to EOJ. 


If the text-length field of a signon message is greater than three (or greater than 15 with the SHIFT 
option set), additional text entered as part of the signon message starts with the fourth (or i6th) character. 
The text-length field should be compared against the maximum record size; if it is greater, the message was 
truncated on the right when moved into the user area. 


Output CD 


The COBOL user data comm program must move 0001 to the destination count field of the output CD 
as part of initialization. To send a message, the user task must: 

1. Move the name of the terminal (from the symbolic source field) to the symbolic destination field. 

2. Move the number of characters to be sent to the text-length field. 

3. Initiate a SEND statement referencing the output CD by name. 


The user should then check the STATUS key field to verify that the message was sent without error. 
To illustrate the simplicity of using these constructs, a sample COBOL user data comm program is given in 
Appendix B. This program receives a message from a terminal and then echoes the message back to the same 
terminal. 


MPLII INTERFACE 
An MPLII user data comm program is an MPLII program compiled with the $ DATACOM option set. 


A single input CD and output CD exist implicitly for an MPLII user data comm task. The various fields 
are accessed through special procedures, rather than directly, as in COBOL. 


It is not necessary for an MPLII user data comm task to initialize any fields in either CD. However, 
TDS requires that an MPLII user data comm program declare an INIT.MSG segment into which the TMCS- 
assigned queue names and dummy station names are placed. The first 12 characters of the INIT.MSG segment 
contain the transaction queue (TQ) name and the second 12 characters contain the communicate queue (CQ) 
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name and the next 12 characters contain the name of the dummy station assigned to this task. One of these 
two queue names must be passed as a parameter to DC.RECEIVE. Information previously passed to an 
MPLII task as INIT.MSG is now queued on the task subnet queue as part of the signon message. 


While the MPLII user data comm constructs are not identical to the COBOL user data comm con- 
structs, they are functionally equivalent. Appendix C contains an MPLII coding example comparable to the 
COBOL user data comm program in Apppendix B. 


SPO INTERFACE 


A SPO message for initiating a data comm task must be preceded by DC, which sends the command 
to TMCS for start-up. TMCS enforces this convention by refusing to open or close data comm files for tasks 


not initiated by TMCS, thereby protecting the data comm network from unauthorized task and attachment re- 
quests. 


ERRORS 


There are six classes of errors involving TDS whether directly or indirectly. They are: system errors, 


network errors, network request errors, data comm communicate errors, TDS command syntax errors, and 
COBOL/MPLII user data comm errors. 


System Errors (Fatal) 


System errors comprise all errors that necessitate either a clear/start of the system and/or a restart of 
the MCS. System errors cannot be logged by TMCS. Included are: hardware errors, message control processor 
(MCP), and data comm controller (DCC) errors, system disk errors, and TMCS fatal runtime errors (such as 
an address error) which result in a discontinuation (DS) or a discontinuation and dump (DP) of TMCS. 


Network Errors 


Network errors comprise errors within the data comm subsystem which cause either the data comm 
processor (DCP), a line, or a station to require some form of intervention. Network errors are logged by 
TMCS. Included are: data comm hardware errors, line errors, and station errors. See Section 2 for further 
information. 


Data comm hardware errors and line errors are reported to the TMCS as soon as they occur. Station 
errors are first encountered by the TNDL request set, which generally attempts to retry the message a number 
of times up to the specified retry count limit (default value of 10) before reporting it to TMCS via a terminate 
error. If any of the retries is successful, the error is not logged. Station errors which cannot be retried by 
the TNDL request set are reported immediately to TMCS, usually via a terminate-no-label. All error messages 
reported to TMCS are recorded in the TDS error log. 


Network Request Errors 


Request errors are reported directly to the MCS queue in response to specific requests (such as make 
station ready) that TMCS makes of the data comm subsystem. Request errors are logged by the TMCS in 
the TDS error log. There are basically two types of request errors: unable to initiate (detected by the DCC), 
and invalid network ‘requests (detected by the DCP). If the network request error is directly related to a 
specified TDS command, an appropriate error indication is returned to the requestor. A detailed breakdown 
of network request errors is given in Appendix F. 


Data Comm Communicate Errors 


Data comm communicate errors are returned to TMCS via the fetch value mechanism in MPLII. They 
are logged in the TMCS error log and a notification of their occurrence is displayed at the SPO. If the data 
comm communicate error is directly related to a TDS command, an appropriate error indication is returned 
to the requestor. (Refer to Appendix F for a complete list of data comm communicate errors.) 
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TDS Command Syntax Errors 


TDS command syntax errors are detected by TMCS, and appropriate responses are returned to the re- 
questor. 


COBOL/MPLII User Data Comm Errors 


COBOL/MPLII user data comm errors are detected by the DCC except for cases where TMCS issues 
a disallow input/output for a specific reason. The errors are always reported to the user data comm task via 
the input/output status (key) mechanism. TMCS issues a disallow input/output for two reasons: to DT a termi- 
nal, and to terminate the TMCS. 
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SECTION 5 
TNDL AND MODEL NETWORKS 


GENERAL 


The transaction network definition language file (TNDL) is the portion of TDS which actually maintains 
the data communications link. Several TNDL files are available, depending upon the requirements of the user. 
Each file defines a specific model network. Table 5-1 lists the model networks available. 


LINE CONTROL SETS 


TNDL supports three distinct line disciplines for data comm functions as well as two for direct data 
entry terminals. The three line disciplines are poll/select, terminal poll/select, and multipoint contention. By 
default, the model networks defined in TNDL use the poll/select line discipline. To change to one of the other 
disciplines, the station’s logical terminal number must be changed via the TDS redefine station (RS) command. 
(Refer to Section 3 for details.) Table 5-2 identifies the logical terminal numbers in TNDL and their definitions. 


Table 5-1. Model Network 


Interpretive Non-Interpretive 
Line Speed Line Speed 
Line Description (Baud) (Baud) 
OPTION 1 0 Remote TD/TC 1800; 3426224 
1 TD Direct 96000 0 ae 
2 TD Direct BBQQO° 4 2 rteeae 
3 TD Direct S400; 0, eee 
OPTION 2 0 TD Direct ——— 38400 
1 TD Direct a 9600 
2 TD Direct ——— 4800 
3 TD Direct ~~— 4800 
OPTION 3 0 Remote TD/TC TSQ0° es eecicecetes 
1 TD Direct 9600 a eee 
2 TD Direct 4800 
3 DDE QA00, chee Sees 
OPTION 4 0 Remote TD/TC 1800 
1 TD Direct 9600 ee 
Z DDE 2400 2 
3 DDE 2400 2 2 He 
OPTION 5 0 TD Direct 9600 
1 DDE DACG- eee 
2 DDE 2400 ee 
3 DDE PAGO ate 
OPTION 6 0 DDE 2400 2 
1 DDE QB0G: rete 
2 DDE PA0G. eee 
3 DDE 2400 a ee 
OPTION 7 0 TD Direct (B80) —_—— 9600 
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Table 5-2. Terminal Definitions 
Terminal No. Definition 


Poll/Select for TD730s 

Multipoint contention for TD730s 

Poll/select for TD800s 

Multipoint contention for TD800s — 

Terminal poll/select 

Poll/select for TD830s 

Multipoint contention for TD830s 

Poll/select for TC4000s and TC5000s 

Multipoint contention for TC4000s and TC5000s 


Oo OAH Bd WD 


Non-Interpretive NDL 


All three standard data comm line disciplines are supported in the non-interpretive form as well. These 
are microcode files which replace NDLDCP when the TMCS is loaded for execution. Due to the memory re- 
quirements when using microcode NDL files, two microcode files are provided. These are: 


NIPTPS (poll/select and terminal poll/select) — 
NIMC (multi-contention) 


The microcode file in use at any given time is changed via the reload DCP (RD) command. Refer to 
Section 3 for details. A sample SPO listing of such a change is found in figure 5-1. 


REQUEST SETS 


Currently, there are three request sets provided in TNDL. One request set is for TD830, TD730, 
TC4200, TC5100, and TC3800 terminals; and two are supplied for B9347 terminals: one as a direct data entry 
station and one as a normal data comm terminal. Only the standard poll/select request set for normal data 
comm is currently implemented. A brief outline of these request sets follows. Figures 5-1 and 5-2 show a gra- 
phic representation of each request set. 


Input (POLL) 

1. DCP asks terminal if it has anything to say (poll sequence). 

2. Terminal responds with either: 
a. EOT (nothing to say). 
b. Message. 

3. If DCP receives message without errors, it transmits ACK to terminate. 

4. If DCP receives a message with errors, it ignores the message. The message is not retried until the 
terminal is polled again. 


Output (SELECT) 


1. Processor asks terminal if it is ready to receive a message (select sequence). 
2. Terminal responds with: 
a. NAK (not ready to receive). 
b. ACK (ready to receive). 
3. If ready, the processor transmits message to terminal. 
4. Terminal responds with: 
a. NAK (message had errors). 
b. ACK (message was OK). 
5. If message had errors, it is retried next time terminal is selected. 
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PROCESSOR TERMINAL 


EOT 


ADDR 
POL 
ENQ 
[ rsa! ntti: 
| 
| 
| EOT 
. SoA 
| 
| SOH 
| (TERMINATE 
NO INPUT) ADDR 
| TRAN 
STX 
| 
: text ( : 
l : 
! 
r ETX 
| BCC 
| 
We areca, fasts 
[~ 
{ a 
(TIMEOUT) 
EOT 
(TERMINATE 
NORMAL) 
£01808 as 


Figure 5-1. Request Poll 


B9347 Request Sets (Normal Data Comm Functions) 


The special request sets provided in TDS for the B9347 terminal make use of the unique keyboard char- 
acteristics of the terminal and the operations which are required when running a DDE task. The B9347 terminal 
runs in a full-duplex asynchronous mode, and since the keyboard and screen are independent of one another, 
the TNDL request set works in an echoplex fashion. It checks each input code from the keyboard and issues 
appropriate output codes to the screen including the display of characters. 


Special Keys 

Program Load 
The terminal ts requesting the execution of a data entry mode program. 
TNDL does the following: 
1. Clears the screen and homes the cursor. 


2. Deletes any partially entered input message from the keyboard. 
3. Accepts the program name. 
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PROCESSOR TERMINAL 


r---- 


NAK 
ACK 


(TERMINATE 
ENABLE INPUT/NOINPUT) 


ed 


Se ee ee 


(TIMEOUT) NAK ACK 


(TERMINATE 
NOINPUT/ERROR) 


(TERMINATE 
NORMAL) 


£01608 


Figure 5-2. Request Select 


Backspace 


TNDL does the following: 
1. Backs up the cursor one character position and erases the last character. 
2. Deletes the last character from the input message. 


Clear/Home 


TNDL does the following: 
1. Clears the screen and homes the cursor. 
2. Deletes any partially entered message. 


' 


Field Terminate 


54 


The following are considered field termination keys: 
1. Field term. 

2. Skip. 

3. Release. 

4. Dup. 


TNDL does the following: 

1. Sends message to user task. 

2. Sends message to TMCS if the message is a control message. 
3. Sends message header to TMCS if TMCS is participating. 


If a receive error occurs, TNDL does the following: 

1. Lights the ERROR indicator on the terminal and sounds the alarm (also on the terminal). 

2. Decrements the station retry count. If the retry count should reach 0, a terminate error occurs and 
TMCS is notified. 

3. Accepts only the RESET key as acknowledgement of the error before accepting more data. 


Certain special control characters (recognizable by the B9347 terminal) can be included in message texts 
sent to the terminal for specific responses. 


BACKSPACE 


@O08@ moves the cursor back one character position and erases the character in the new position. If 
the cursor is in the first character position of a line, the cursor moves to the last character position of the 
previous line. 


CLEAR/HOME 
@OQB00@ clears the screen and homes the cursor. 
POSITION CURSOR 


The cursor may be repositioned on the screen by a @09@. The character immediately following deter- 
mines the absolute position (0 through 255). 


LINE FEED 


@OA@ moves the cursor to the same column position of the next line. If the cursor is in the last line, 
it advances to the same column position in the first line of the screen. 


MODEL NETWORKS 


As shown in table 5-1, there are seven basic options to choose from when selecting a model network. 
One of these model networks should conform to the user environment so that a minimum of line redefinition 
and station redefinition is required. A DC warmstart through TDS should be necessary only during the initial 
installation, and whenever the user DC environment changes. 


The mode! networks provided with DDE as part of the configuration are also available with various 
translations for the international user. The following summarizes these translation versions: 


Version Number Countries Where Applicable 

#1 USA - Canada - Australia - United 
Kingdom - Spain - Sweden - 
Finland 

#3 France - Belgium 

#4 Italy 

#5 Germany - Austria - Switzerland 

#6 Portugal - Brazil 

#8 Norway - Denmark 


#11 Katakana 


Presently, there are 31 model networks available to the user when implementing the TDS data comm 
subsystem. 
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1967 ASCII And EBCDIC Character Assignments (Cont.) 


1967 ASCII EBCDIC EBCDIC Graphic EBCDIC Punch Code 
42 C2 B 12-2 
43 C3 C 12-3 
A4 C4 D 12-4 
45 C5 E 12-5 
46 C6 F 12-6 
47 C7 G 12-7 
48 C8 H 12-8 
49 C9 I 12-9 
4A D1 J 11-1 
4B D2 K 11-2 
4C D3 dL; 11-3 
4D D4 M 11-4 
4E D5 N 11-5 
4F D6 O 11-6 
50 D7 Pp 11-7 
51 D8 Q 11-8 
§2 D9 R 11-9 
53 E2 S 0-2 
54 E3 T 0-3 
55 E4 U 0-4 
56 ES V 0-5 
57 E6 WwW 0-6 
58 E7 xX 0-7 
59 E8 Y 0-8 
SA E9 zZ 0-9 
5B 4A [ 12-8-2 
SC EO i 0-8-2 
5D SA ] 11-8-2 
SE SF A 11-8-7 
SF 6D underline 0-8-5 
60 79 rs 8-1 
61 81 a 12-0-1 
62 82 b 12-0-2 
63 83 c 12-0-3 
64 84 d 12-0-4 
65 85 e 12-0-5 
66 86 f 12-0-6 
67 87 g 12-0-7 
68 | 88 h 12-0-8 
69 89 i 12-0-9 
6A 91 j 12-11-1 
6B 92 k 12-11-2 
6C 93 ] 12-11-3 
6D 94 m 12-11-4 
6E 95 n 12-11-5 
6F 96 oO 12-11-6 
70 97 p 12-11-7 
1 98 q 12-11-8 
72 99 r 12-11-9 
73 A2 Ss 11-0-2 
74 A3 t 11-0-3 
75 A4 u 11-0-4 
76 AS Vv 11-0-5 
77 A6 Ww 11-0-6 
78 A7 x 11-0-7 
79 A8 y 11-0-8 
TA A9 z 11-0-9 
7B CO { 12-0 
7C 6A | 12-11 
7D DO } 11-0 
TE Al Ag 11-0-1 
7F 07 DEL 12-9-7 
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APPENDIX A 
1967 ASCII And EBCDIC Character 
Assignments 


EBCDIC EBCDIC Graphic 
00 NUL | 
01 SOH 
02 STX 
03 ETX 
37 EOT 
2D ENQ 
2E ACK 
2F BEL 
16 BS 
05 HT 
25 LF 
OB VT 
0C FF 
OD CR 
OE SO 
OF SI 
10 DLE 
1] DC1 
12 DC2 
13 DC3 
3C DC4 
3D NAK 
32 SYN 
26 | ETB 
18 CAN 
19 EM 
3F SUB 
27 ESC 
1C FS 
1D GS 
1E RS 
IF US 
40 SP 
4F ! 
7F - 
7B # 
5B $ 
6C % 

50 & 
7D - 
4D ( 
5D ) 
5C = 
4E + 
6B ; 
60 = 
4B - 
61 / 
FO 0 
Fl 1 
F2 2 
F3 3 
F4 4 
F4 5 
F6 6 
F7 7 
F8 8 
F9 9 
TA = 
SE ; 
4C < 
7E = 
6E > 
6F ? 
Ie @ 
Cl A 


EBCDIC Punch Code 


12-0-9-8-1 
12-9-1 
12-9-2 
12-9-3 
9-7 
0-9-8-5 
0-9-8-6 
0-9-8-7 
11-9-6 
12-9-5 
0-9-5 
12-9-8-3 
12-9-8-4 
12-9-8-5 
12-9-8-6 
12-9-8-7 


12-11-9-8-1 
11-9-1 
11-9-2 
11-9-3 
9-8-4 

9-8-5 


9-2 


0-9-6 
11-9-8 
11-9-8-1 
9-8-7 
0-9-7 
11-9-8-4 
11-9-8-5 
11-9-8-6 
11-9-8-7 
No punches 
12-8-7 


Pwo WAIKnA WN © 


to 


11-8-6 
12-8-4 


Pe 
Go 
On 


0-8-7 


Qe 
b 


12-1 


APPENDIX B 


SAMPLE COBOL PROGRAM FOR TDS 


INTERFACE 


STANDARD INTERFACE 


83/23/78 


Sew wawnr 


@eunnreusens cenpy envy svsrTren 
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1 € 
Ou ¢€ 
8 RESET CODE 


INMERTIFICATION DIVIS LOW. 
PROGRAM-IDe OCTESTe 
ENVIRONMENT DIVEISTOWe 
CONFERURATION SECTION 
SOURCE -COMPUTER, 


BR20 6 
OBJECT -COMPUTER « 
AA206 
he ee al dk 
s INPUT COs FORMAT 1 FRPLICIT CESCRIPTION e 
C8 Oe © 6 © Oe HR RHO SOOM E SESE ERETEHRHOSE BOTH TEES SOB ee Be eee Ge wa 
«© CO CO-WAME FOR EINE TIAL) ENPUT O1 DATA-NONE -8 ] 
® CC FSYMBOLIC QUEUE ES DATA-NAME-1) 02 OATA-NAME@4 PC XC12) © 
@ CESYMBOLIC SHUB-ONEUF-1 8 DATA-WAME-2) O02 DATA NAME? PE XC412) 
® (ESYMBOLIC SUB-ONEUE-2 TS GATA-WNAME-3}) O02 DATA-NAME-3 PC XCL2) © 
we CISYMBOLIC SUB-QHEUE-3 16 DAT A-WAME-€) OF DATA-NAME-@ PC XC12) © 
© CIMESSAGF DATE 1S OCATA-NAME-5 ) G2 OATA-NAME-5S PC 9CNE)D © 
@ E€SMESSAGE TIME 38 DATA-NAME-6 ) A2 DATA-NOHE-6 PC SCAB) @ 
® CSSYMBOLIC SOURCE 1S UATA-NAME-7)} O@2 DATA-NAME-7 PC KC2) © 
B eee ereene ce rece r] 
oe CITEWT LENGTH 1S DATA~NAME -6) O02 DOATA-NARE-8@ PC 9008) o 
® wrest teeene « 
® C8ENND KEY £5 DATA-WAME-9) G2 OATA-NMEME-F PC X s 
# CISTATUS KEY IS DAT A-WAME-10) Q2 DATA-NAMNE-10 PC XX i 
td] ween “ae a 
e (#MESS&GE COUNT IS NATA-NAME~-11) 82 DATA-NAME-114 PC 906630 
e @ 
e a 
s EMPUT CNht FORMAT 2 é 
S wcewaenvwaa a we Se © ee HE EE SPEEA Dee Beas GSe SEEM Ce Se EF BEES SCA Kath ewes @ a 
© CO CU-MAME FOR CENE TIAL) ERPUT [DATASNANE-t ree es MIA-WAME-Si)e @ 
 ] e 
» OUIPUT CO TMPLICHT MESCRIPTION e 
a re BE Oe BK OF OW OOH BFE BEB EAEBE BHO DEF aetat®aetaes Set eet at wn wmumoaweatatateevuasn ff 
8 CD CD-NAME FOR CUTPUT Of CATA MANE -6 e 
w CSDESTEMATION COUNT FS DAT A-WANE-4) O2 DATA-NMME~-1 PC SCG) © 
© CATEYT LENGTH 1S DATA“WAME-2) G2 DATA-NAME-2 PC 9(C 04) @ 
a norm ee Bae ea Oe e 
e (ISTATUS KEY 18 DATA-NAME-3) O2 DATA-NAME-3 PC XX « 
e - a - - - : 
# CADESTINATION TABLE OCCURS I-2 TIMES G2 DATA-NAME OCCURRS I-20 
@ (C3INDEXED BY X-NAME 4 (oX-NAME= 26 oe J) TEMES ® 
w CHERROR KEY 18 NATA-WAME-4) 62 DATA-NAME-G PC X e 
w CESYMBOLITC DF ETENAT TION TS DATA-NAME~-5} "2 DATA-NAME-5 PC XC42) 2&8 
# wre rena e wot ewer e -- e 
oe e e 
SHER RSE ARTE RHKERR RR ARHRREREEKSEKRERAREGEKRRPEREKGRPCRERAEHHRERER REESE 


; Figure B-1. Standard Interface Example (Sheet 1) 
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88 DS-ED VALUE 1. 
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O03 SYMSOURCE. 
O04 INPUT-COMMAND PIC X(3). 
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O03 MCS-CONTROL-MSG. 
0&6 CNTRL-CHR PIC X. 
04 CMMAND PIC XX. 
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OL OUTPUT-BUFFER. 
O02 OUTPUT-TEXT PIC K(240). 
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*SYMBOLIC SUB-QUEVE<3 I[S SYMBOLIC-SUB-QUEUE-3 
MESSAGE DATE [5S MESSAGE-OATE 
MESSAGE TIME IS MESSAGE-TIME 
*SYMBOLIC SOURCE [S SYMBOLIC-SOURCE 
PTEXT CENGTH IS [NPUT=TEXTeLENGTH 
e*END KEY [S END-KEY 
STATUS KEY IS INPUT<STATUS<-KEY 
PMESSAGE COUNTY IS MESSAGE-COUNT. 
CO OUTPUT-CD FOR OUTPUT 
POESTINATION COUNT IS DESTENATION-COUNT 
TEXT LENGTH 1S JUTPUT<TEXT-LENGTH 
PSTATUS KEY IS DUTPUTHSTATUS-KEY 
FERROR KEY 1S ERROR-KEY 
SYMBOLIC DESTINATION [S SYMBOLIC-DESTINATION. 
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JL4500¢ FIRST TIMES CAUSES ATTACH QUEUE REQUEST. IF ALLOWED THEN * 
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J14700¢ 2) INPUT BUFFER GETS FExt CIF ANY) * 
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315840 ELSE IF CMMAND = "PL" 
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016500 GO TO EXIT-FOREVER. 

OL 6600 we ener etereneerecereereeweent ete ewer eene tweet eeeeeennteteteneateanes 
0167006 USER PROCESSING - SETUP TO ECHO MSG TO INTERACTIVE FERMINAL @ 
JLiGIDO ee ew etree wenreneenateetwnewenterereeewanteteeneesetecretwaeerenseneatene® 
916900 MOVE INPUT-~TEXYT TO OUPUT-TEXT. 

017000 IF INPUT-TEXT-LENGTH GREATER 240 THEN 

917100 MOVE 255 TO ENPUT-TEXT-LENGYH. 

017200 MOVE INPUT-TEXKT-LENGTH TO OQUTPUY-TEXT-LENGTH. 

947390 MOVE SYMBOLIC-SGURCE 10 SYMBOLIC-DESTENATION. 

OL7400 SEND QUTPUT-COD FROM OUTPUT-BUFFER WITH EGI. 

017590 PERFORM CHECK-OUTPUT-STATUS THRU EXIT I-OUFPUT-STATUS. 

017600 EXIT-FOREVER. 

0177%0 EXIT. 
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347900 CHECK-INPUT-STATUS. 


918000 IF LNPUT-STATUS-KEY EQUAL 0 

018050 eeeeree GOOD INPUY ecowewuesvean 

018100 GO 10 EXIT-INPUT-STATUS. 

018200 IF INPUT+STATUS-KEY EQUAL 20 THEN 

Jivr DOO RHR SHE EEHOEHEEEAEHEEO RHR HARE HHER EH EKER HME ORE HORE EERE BE 
OLBsude THE LAST TERMINAL SIGNEO OFF VIA AN MCS #©O0T COMMAND * 
9185006 - SUGGEST THAT YOU TERMINATE (EGU) - ° 
OL 8600 te ee we mee me edhe Oh thOhEOTHARttes CoHeBKeneseenteEseeenaeneee 
91870) DISPLAY SYMBBLIC-CGUEUEs "= DETACHED/SUNKNOBN® 

0168600 STOP RUN. 

018900 IF INPUT*STATUS*KEY EQUAL 91 THEN 

919000 DISPLAY “MCS/OC SUBSYSTEM NOY AVAILABLE® 

019190 STOP RUN. 

OL9200 EXIT-INPUT-~STATUS. 

019300 EXIT. 

019400 CHECK-OQUFPUT-STFATUS. 

019500 IF QUFPUT-STATUS-KEY EQUAL 0O THEN 

Vi9EHOeeeeree COOD UUTPUT eereenncewe 

019700 GO TO EXIT<OUFPUT-STATUS. 

019800 IF OUTPUT~STATUS-KEY EQUAL 20 THEN 

DL DPO De ewe wae ane eh OKOH AHHH eesteetewateeFGententeteRentteteaaet ete 
620000« THIS INDICATES THE TERMINAL HAS SIGNED OFF VIA «DT . 
OZOL OG we eae me Meee HEH HEHEHE HEHE TREEHS SHH HR EEEKEERE RTE OHE ROE EEO HEE 
020290 DISPLAY SYMBOLIC-ODESTINATION> © DETACHEO/SUNKNOKN “> 
920300 INPUT-COMMAND 

020400 CO FO EXIT-OUTPUT-STATUS. 

9205900 IF QUTPUT-STATUS-KEY EQUAL 30 THEN 

920600 MOVE 1 TO DESTINATION-COUNT 

520700 SEND QUTPUT-CO FROM OUTPUT-BUFFER WITH EGI 

620°70 GO TO EXIVY-OUFPUT-STATUS. 

026 JQ IF QUTPUYT-STATUS-KEY EQUAL 50 THEN 

321000 DISPLAY “CHAR COUNT > LENGTH OF OUTPUT BUFFER® 

921100 690 TO EXIT-OUTPUT-STATUS. 

59212099 IF QUIPUT-STATUS-KEY EQUAL 91 THEN 

621300 DISPLAY “MCS/D0C SUBSYSTEM NOT AVAILABLE® 

021490 STOP RUN. 

021500 EXIT T-OUTPUI-STATUS. 

021600 EXxfy. 


021700 ENO-O0F -J08. 
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. The following example shows a more complex user data comm task interfacing with TMCS. Data is 
input to this program in the following manner: 


If no control characters (? or /) is detected, the text is echoed back to the sender. If one of the control 
characters is detected, the program looks for a command. The DS command causes the task to go to EOJ. 
The SE (send) command is assumed. If the destination MCS is specified, then the text is assumed to be a 
TDS command. If DC is specified, the text is sent to the SPO. If MXn is specified, the text is sent to the 
dummy station (MXn) of an attached task. 


If messages with symbolic-source of MCS are found on the transaction queue, the message is displayed 
on the SPO. If the message is a message header, the task converts it to displayable characters. 


The only distinction between the two control characters is made for messages sent to the MCS. The 
/ requests that the response be in internal format. For responses on the communicate queue, the three-byte 
fetch value is converted to displayable characters and enclosed in @ characters. 


Appendix C contains the same program, functionally, written in MPLII. 


USER DATACOM TASK 


31/78 BURROUGHS Cc Os € 8 
Cc L 


x» 
Ue 


PUT M 
9 8B O C 0 


0°*500 IDENTIFICATION DIVISION. 


0.4600 PROGRAM-ID. DCCBL. 
000700 ENVIRONMENT DIVISION. 
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609900 
001000 
NO1100 
001200 
001300 
00: %0 
001,00 
001600 
001700 
001800 
001810 
001620 
001830 
001640 
901900 
002000 
002100 
N02200 
002300 
002400 
002500 
002600 
002700 
902800 
002900 
003000 
003100 


004600 
004700 
004800 
904900 
005000 
005100 
005200 
005300 
005400 
005500 
005600 
005700 
005800 
005900 
006%0 
Oof O 
006200 
006 300 
006400 
706500 
06600 
306700 
005860 
006 900 
0067000 
007100 
007200 
007300 
007400 
007500 


DATA DIVISION. 
WORKING"“STORAGE SECTION. 
77 RUN-TOG PIC 9 VALUE 0. 
88 OS-ED VALUE 1. 


01 


01 


01 


Ol 


01 


01 


01 


QO} 


01 


INPUT“HUFFER. 
O3 INPUI-TEXT. 
OS SYMSOURCE. 
O7 INPUT-CNIRL“CHR PIC XxX. 
O7 LOCAL-CMMAND PIC xxx. 
O77 FILLER PIC xB). 
OS OUM-TEXT RENEFINES SYMSGURCE. 
O7 FILLER PIC X(3). 
O7 TEST=TXT PIC x3). 
O7 FILLER PIC X(6). 
O05 MCS~CONTROL<“MSG. 
O7 CNTRL-CHR PIC X. 
O7 CMMAND PIC Xx. 
OS INTT“MSG PIC xX€228). 
OUFPUT-BUFFER. 
O53 OUTPUT-TEXT. 
C5 QUTPUT=CHAR PIC x. 
OS FILLER PIC xX(2359). 
O03 OUSPUT-ERR PIC KC15) VALUE * ## MSG OVFL ga". 
WORKERS. 


03 TO PIC X12). 
O03 CO PIC x12). 
O3 DUMMY-STATION PIC X(12). 
O3 INTERNAL PIC 9. 
03 MSG PIC X(38). 
O03 TEXT-LENGTH PIC 9999. 
O3 SYM-DEST-2 PIC Xx. 
03 C. 
OS FILLER PIC XxX. 
O3 OUMMY-C REDEFINES C. 
05 Ct PIC 9 COMP. 
05 CR PIC 9 COMP. 
O03 SUB1 PIC 999. 
O03 SuB2 PIC 999. 
O03 SUBL PIC 999. 
O3 IN-TEXT“3 PIC XXX. 
WORK-ITNPUT“TEXT. 
O03 wWORK-IN-CHAR PIC X GCCURS 243 TIMES. 
WORK-OUFPUI-TEXT. 
O03 wORK-OUT“CHAR PIC x OCCURS 240 TIMES. 
WORK-INVALID. 
O3 FILLER PIC X(8) VALUE ™ INVALID". 
DUMMY-w-INV REDEFINES WORK-INVALID. 
O03 WORK-INV=-CHAR PIC X OCCURS 8 TIMES. 
CHAR-WORK-IN. 
O03 THE-CHAR PIC 99 COMP. 
CHAR-WORK-A REDEFINES CHAR-WORK~-IN. 
O03 A-CHAR PIC X. 


COMMUNICATION SECTION, 


CD 


CO 


INPUT~CD FOR INIVIAL INPUT 

SYMBOLIC QUEUE IS SYMBOLIC-QUEUE 

*SYMBOLIC SUB-QUEUE-1 IS SYMBOLIC-SUB-OQUEUE-1 
SYMBOLIC SUB-OQUEUE-2 IS SYHMBOLIC-SUB-CUEUE-2 
*SYMBOLIC SUB-QUEUE-3 1S SYMBOLIC-SUB-QUEUE~3 
MESSAGE DATE IS MESSAGE-DATE 

MESSAGE TIME IS MESSAGE-TIME 

*SYMBOLIC SOUKCE IS SYMBOLIC-SOURCE 

sTEXT LENGTH IS INPUT-TEXT-LENGTH 

7END KEY IS END-KEY 

STATUS KEY IS INPUT“STATUS@KEY 

MESSAGE COUNT IS MESSAGE-COUNT. 

OUFPUT-CD FOR OUTPUT 

DESTINATION COUNT IS OESTINATION-COUNT 
sTEXT LENGIM IS QUTPUT“TEXT=LENGTH 

SSTATUS KEY IS QUIPUT-STATUS<KEY 

FERROR KEY IS ERROR“KEY 


PSYMBOLIC DESTINATION IS SYMBOLIC “DESTINATION. 
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O0760U8 PAGE 
OO7700 PROCEDURE DIVISION. 
007800 BEGINNING-OF -508. 


007900 
008000 
O0F'00 
00 30 
908300 
008400 
008500 
008600 
008700 
008800 
008900 
009000 
009100 
009290 
009 300 
009400 
009500 
003600 
009700 
009800 
009900 
010000 
010100 
010200 
010300 
010400 
0610500 
010600 
01 0 
O9LuG00 
010900 
911000 
011100 
911200 
011300 
OLL&00 
G1t500 
011600 
Olt f3u 
014800 
011900 
022000 
012100 
012290 
012300 
012400 
012590 
012600 
012709 
O1L2800 
012900 
013000 
013190 
01 40 
01.5090 
013400 
013509 
015690 
013709 
013899 
9013990 


MOVE SYMBOLIC-QUEUE TO TQ. 

MOVE SYMBOLIC-SUB-QHEUE-1 TO CQ. 

MOVE SYMBOLIC-SUB-QUEUE-2 TO OUMMY-STATION. 
MOVE L TO DESTINAT{LON-~COUNT. 

MOVE SPACES TO SYMBOLIC-SUS-QUEUE-1. 

MOVE SPACES TO SYM#OLIC-SUB-QUEUE-2. 

MOVE SPACES TO SYMdOLIC-SUB-QUEUE <3. 

PERFORM FOREVER THRU EXIT-FOREVER UNTIL DS-E€0. 
STOP RUN. 


FOREVER. 


MOVE O TO INTERNAL. 

MOVE SPACES TO INPUT-BUFFER. 

MOVE TO FO SYMBOLIC-QUEUE. 

RECEIVE INPUT-CD MESSAGE INTO INPUT -BUFFER. 
PERFGRM CHECK-ENPUT-STATUS THRU EXIT -INPUT-STATUS. 


MOVE 
MOVE 


INPUT-TEXT"“LENGTH TO FEXT-“LENGTH. 
INPUT-TEXT TO WORK-INPUT-TEXT. 


IF TEXT-LENGTH GREATER 255 
MOVE 255 TO TEXT-LENGTH. 
MOVE SYMBOLIC-SQURCE TO SYMBOLIC-OESTINATION. 


IF SYMBOLIC~SGURCE NOT EQUAL “MCS* GO TOG NOT-FROM-MCS. 


IF CNTRL“CHR NOT EQUAL “**" GO TO NOT-“STAR. 
IF CMMAND EQUAL "PL" 
PERFORM PUT-INVALID THRU END-PUT-INV 
DISPLAY WORK~INPUT<-TEXT 
STOP RUN. 
MOVE ENPUT-TEXT TO WORK-INPUT-TEXT. 
ADD 1 TEXT-LENGTH GIVING SUBL. 
IF SUB1 NOT GREATER 255 
MOVE 2002 TO AORK~IN-CHAR(SUB1). 
DISPLAY wWORK~INPUIF-TEXT. ‘ 
IF CMMAND EQUAL "AT" OR "EX" GR "RN 
iF TEXT-LENGTH EQUAL 15 
GO YO EXIT "FOREVER 
ELSE 
SUBTRACT 15 FROM INPUT-TEXI-LENGTH 
GIVING TEXT*LENGTH 


MOVE SYMSOURCE TO SYMBOLIC-DESTINATION CUMMY-STATION 


MOVE INIT-MSG TO INPUT-TEXT 
GO FO NOT *FROM-MCS 
ELSE 
IF CMMAND EQUAL “"DT™ OR *RE™ OR “AQ” GR EQ" 
OISPLAY CMMANT * RECVD" 
GO TO EXIT-~FOREVER 
ESE 
IF CMMAND EQUAL "VA" OR "TE" 
DISPLAY CMMAND “™ RECVO* STOP RUN. 
NOT-STAR. 
IF CNTRL“CHR EQUAL 3002 


MOVE [NPUT-~TEXT TO WORK-INPUT“TEXT WORK-OUTPUY-TEXT 


MOVE "a" TO WORK-OUT-CHAR(13) 
MOVE "O™ TO WORK -OUT-CHAR(C14) 
MOVE "O07 TO WORK-OUF-CHARCLS) 
MOVE “27 TO WORK-OGUT-CHARC 16) 
MOVE "2" TO wORK-OQUT-CHARC17) 
MOVE 14 FO SuB1 

MOVE 18 TO SUB82 

MOVE 35 TO SUBL 

PERFORM CHAR~TO-HEX THRU END“CHAR“TO-HEX 
MOVE "oa" TO WORK-OQUT-CHAR( 8B) 
MOVE 89 TO SuBl 
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014000 
014190 
014290 
014300 
014490 

14500 
O1So%0 
014610 
014629 
014709 
014 800 
GO144850 
014900 
015000 
0151090 
015200 
015300 
015490 
015500 
015690 
015700 
015800 
015900 
015100 
014200 
0165300 
015400 
016500 
016510 
016600 
~14700 
Ji6 800 
015990 
017990 
017103 
017 304 
0174600 
017410 
017500 
917600 
OL7700 
Gi7800 
O17 300 
0130900 
013106 
018400 
018500 
018690 
0138700 
O18dd)v 
0189990 
O1l8y¥19O 
0189270 
019000 
019100 
V19200 

19 3090 
019400 
019500 
9139650 
019/90 
019390 
OL19S5O0 
M19 479 


MOVE &9 YO S$uU82 
PERFORM SUBSTRING-I-O UNTIL SUBL GREATER 240 
MOVE WORK-OQUIPUT-TEXT £3 OUTPUT-TEXT 
DISPLAY OQUTPUT-TEXT 
GO FO EXIT-FOREVER 
ELSE OFSPLAY INPUT~TEXT GO TO EXIT-FOREVER. 
HOE EROMSO MCS. 
IF SYMBOLIC-SOURCE NOT EQUAL “MCS” 
MOVE SYMBOLIC-SOURCE TO OUMMY-STATION. 
MOVE INPUT-TEXT TO WORK-INPUT-TEXT. 
IF TNPUT~CNTRL-CHR EQUAL "2" OR *“/" GO TO CONTINUE-IT. 
GO FO ECHO-IT. 
CONTINUE <TIT. 
IF LOCAL~CMMAND EQUAL "DS * MOVE 1 TO RUN-TQOG 
GO TO EXIT-FOREVER. 
IF LOCAL-CMMAND EQUAL "SE * 
MOVE 2 TO Sual 
MOVE 5 TO SUB2 
PERFORM SUSSTRING@=I-I UNTIL SUB2 GREATER TEXT-LENGIH 
SUBTRACT 3 FROM TEXT-LENCTH. 
MOVE WORK-INPUI-TEXT TO INPUT-TEXT. 
MQVE LOCAL~CMMAND T90 IN“TEXT=3. 
IF IN-TEXT-3 EQUAL “DC * 
MOVE 1 YO SuUBi 
MOVE S TO SuB2 
PERFORM SUBSTRING-I-O UNTIL SUd2 GREATER TEXT-LENGTH 
MOVE WORK-OUIPUT-TEXT TO OUIPUT-TEXT 
MOVE "DC™ TO SYMBOLIC-DESTINATION 
SUBTRACT 4&4 FROM TEXT-LENGTH 
MOVE TEXTLENGTH £0 OUTPUT-TEXT-LENGIH 
SEND OQUTPUT-CD FROM OUTPUT-BUFFER WITH EGI 
PERFORM CHECK~OUTPUT“STATUS THRU EXIT-OUTPUI-STATUS 
GO TO EXIF-FOREVER 
ELSE 
IF IN-TEXT-3 GREATER "MX/" AND LESS "MX:" 
MOYt: Tt TD Suet 
MOVE 6 TG SUB82 
SUBFRACT S FROM TEXT-LENGITH 
PERFORM SU3STRING@I-O0 UNTIL SUB2 GREATER TEXT-LENGIH 
MOVE IN-TEXT-3 TO SYMBOLIC-DESTINATION 
MOVE TEXT-LENGTH TO QUIPUT-TEXI-LENGTH 
SEND OUTPUT-CD FROM OUTPUT-BUFFER WITH EGI 
PERFORM CHECK-QUIPUT-STATUS THRU EXIT“OQUTPUT-STATUS 
GO TO EXIT-FOREVER 
ELSE 
IF IN“TEXT-3 EQUAL "MCS" 
MOVE 2 T0 SUB1 
MOVE 6 TO SU82 
PERFORM SUBSTRINGcI-I UNTIL SUB2 
GREATER YEXT-LENGTH 
SUBTRACT 4 FROM TEXT"“LENGTH. 
IF INPUT-CNFRL-CHR fQUAL “7 
MOVE 1 TO INTERNAL ELSE MOVE O TO INTERNAL. 
BUILD-AND-SEND. 
MOVE 2002 TO WORK-OUT-CHAR(1). 
IF INTERNAL EQUAL 1 
MOVE 2 FO SwUBIi 
ELSE MQVE 1 TO SuBl. 
MOVE 2 YO SUB2. 
PERFORM SUBSTRING-I[-O0 UNTIL SUB2 GREATER TEXI-LENGTH. 
MOVE WORK-QUTPUT“TEXT TA QUIPUI-TEXT. 
MOVE “MCS™ TO SYMBOLIC-DESTINATION. 
SUBTRACT £1 FROM TEXF-LENGTH. 
MOVE TFXT LENGTH TN OUTPUTA$TEXT<LENGTH. 
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20000 
920100 
020200 
020300 
620400 
02°500 
0. .00 
020700 
020710 
020800 
020900 
021000 
021100 
021200 
021 300 
021400 
021500 
021600 
02:1700 
0214600 
021900 
022000 
022100 
022200 
022290 
022300 
022400 
022500 
022600 
022700 
022800 
O07 800 
023000 
023100 
023200 
023300 
023400 
023410 
023500 
023600 
023700 
023800 
022900 
024000 
024100 
024200 
024300 
024400 
024500 
024600 
624700 
024800 
024900 
025000 
025100 
025200 
02 ‘00 
02,400 
025500 
025600 
025790 
0258600 
025900 
026000 
02610u 
026200 
026 300 
026400 
026500 


026600. 


026700 
026800 


6 


SEND OUTPUT-CO FROM OUIPUT“BUFTER WITH EGI. 

PERFORM CHECK-OUTPUT-~STATUS THRU CXIT“UUTPUT-STATUS. 
RECV=LOOP. 

MOVE CO TO SYMBOLIC-QUEUEL. 

RECEIVE ENPUT"CD MESSAGE INTO INPUY-BUFFER. 

PERFORM CHECK@INPUT~STATUS THRU EXIT-INPUT-STATUS. 

MOVE ENPUT<TEXT TO WORK-INPUI“TEXT. 

MOVE INPUT~TEXT~LENGTH TO TEXKT"“LENGTH. 

MOVE DUMMY“STATION YO SYMBOLIC-DESTINATION. 

IF SYMBOLIC-OESTINATION GREATER “MX/* AND LESS “MX: 


MOVE INPUT-TEXT TO OUTPUT-TEXT WORK-OUTPUI-TEXT 
ELSE 

MOVE "a" TO WORK-DUT~CHAR(1) 

MOVE 1 TO SUB1 

MOVE 3 TO SUJL 

MOVE 2 YO SU62 


PERFORM CHAR-TO-HEX THRU END-CHAR-TO“HEX 
MOVE "2" TO WORKOUT ~CHAR(B) 
MOVE TOST*FXT 10 INWTEXT $3 
IF INTCRNAL EQUAL 1 AND IN-TEXT<3 NOT EQUAL 
MOVE 4 YO SU61 
SUBTRACT 3 FROM TEXT-LENGTH GIVING SUBL 
MOVE 9 TO SU82 . 
PERFORM CHAR*TU"HEX FHRU END-~CHAR@TO-HEX 
ADD TEXT-LENGTH TO TEXT“LENGTH 
ADD 2 10 YTEXI-LENGTH 
ELSE MOVE & FO SuB2 
MOVE 9 YO SuB} 
PERFORM SUBSTRING-!-0O UNTIL SuUB2 
GREATER TEXTI-~LENGTH 


ADD 5 19 TEXT“LENGTH. 
MOVE WORK-OUTPUT-TEXT TO OUTPUT-TEXT. 
IF END-KEY NOT EQUAL 2 GO TO END-RECV. 
MOVE DUMMY-STATION TO SYM~DEST-2 SYMBOLIC-DESTINATION. 
MOVE TEXT“LENGTH TG QUTPUT-TEXT-LENGTH. 
LF SYmM-DEST-2 EQUAL "MX" 
SEND OCUTPUT-CD FROM OUTPUT-BUFFER WITH EMI 


PERFORM CHECK-OUTPUT"STATUS THRU EXIT*OUTPUTH“STATUS 


ELSE 
IF SYM-DEST-2 EQUAL “TD™ 
MOVE OUTPUT-TEXY TO WORK~OQUTPUT-TEXT 
ADD 1 TO OQUTPUT-TEXI-LENGTH 
MOVE OUTPUT-TEXT“LENGTH TO SU3]1 
MOVE @lle TO WORK-OUT-CHARCSUBL ) 
MOWE WORK*QUTPUT~TEXT TO OUIPUT-TEXT 
SEND OQUTPUT-CO FROM OQUIPUT-BUFFER WITH EGI 


PERFORM CHECK“GUIPUT<STATUS THRU EXITT-QUTPUT-STATUS 


ELSE 
IF SYM-DEST-2 EQUAL “DC” 
DISPLAY QUTPUT“BUFFER 
ELSE 
SENO OQUIPUT-CO FROM OUTPUTY-BUFFER WITH EGI 
PERFORM CHECK-OUTPUT-STATUS THRU 


EXIT~QUTPUT*STATUS. 


GO TO RECV~LOOP. 
END-RECV. 

PERFORM PUT-“SYM-SOQURCE., 

MOVE WORK-GUTPUT-TEXT TO ODUTPUI-TEXT. 

IF SYMBOLIC“DESTINATION EQUAL “D0C* 
DISPLAY QUIPUT-SUFFER 

ELSE 
ADD 13 TEXT-LENGTH GIVING OUTPUT-TEXT“LENGTH 
SEND OUTPUT"“CD FROM OQUEPUT-BUFFER WITH EGI 


PORT ORM CHECK~QUTPUT~STATUS THRU FXIT-OQUTPUT-STATUS. 


GO TO EXIT“FOREVER. 
ECHO-IT. 
MOVE INPUT“TEXT TO OUTPUT<TEXT. 
IF TEXT LENGTH GREATER 240 
MOVE 255 TO TEXT-LENGTH. 
MOVE TEXT@LENGTH TO OUTPUT~“TEXT“LENGTH. 
SEND OUTPUF“CD FROM OUTPUT“8UFFER WITH EGI. 
PERFORM CHECK“OUTPUT@“STATUS THRU EXIT*QUSPUT<STATUS. 


026900 EXIT“FOREVER. 


027000 


EXIT. 


Figure B-3. Sample User Data Comm Task (Sheet 5) 


O27300% PAGE 
O27200 PUT-INVALID. 


027300 MOVE INPUY“TEXT YO WORK~INPUT-IEXT. 
027400 IF INPUT~TEXT-LENGTH GREATER 235 

02 0 MOVE 235 TO SuUB1 

027000 ELSE MOVE INPUT“TEXT-LENGTH TO SUB1. 
027700 MOVE i TO SUB2. 

027600 PUI~INV-LOOP. 

027900 MOVE WORK-TNV~CHARC(SUB2) TO WORK~IN-CHAR(SUB1).« 
028000 ADD 1 10 SuB2. 

028100 ADO 1 10 SUB). 

028200 IF SUB2 GREATER 6 

028300 IF SUB1 NOT GREATER 243 

028400 MOVE 2008 TD WORK-IN-CHAR(SUB1) 
026500 GO TO END-PUT-INV 

028600 ELSE GO TO ENN-PUT-INV. 

028700 GO TO PUT-INV-LOOP. 

028800 END-PUT-INV. 

028900 EXIT. 


OL PDO Ot eee enter sents eee det teeta eee Ne REED Ene eee eee ene tend arenten 


029100 CHAR-TO~HEX. 


029200 ADD SUB1 YO SUBL. 

029300 CHAR-HEX-LQOP. 

029400 MOVE WORK~IN-CHAR(SUS31) TO C. 

029500 IF CL GREATER 9 ADD 37 CL GIVING THE-CHAR 

029600 ELSE ADD 30 CL GIVING THE-CHAR. 

029650 IF THE-CHAR GREATER 46 SUBTRACT 6 FROM THE-CHAR. 
029700 MOVE A~CHAR TO WORK-OQUT~CHAR(SUB2). 

029800 ADO 1 10 SuB2. 

02°°40 IF CR GREATER 9 ADD 37 CR GIVING THE-CHAR 

03. J0 ELSE ADD 30 CR GIVING THE-CHAR. 

030050 IF THE“CHAR GREATER 46 SUBTRACT 6 FROM THE-CHAR. 
030100 MOVE A-CHAR 10 WORK~OQUI-CHAR(SUB2). 

030200 AOD 1 TO SUBZ2. 

030300 ADC 1 TO SUB1. 

030400 IF SUB1 EQUAL SUBL GO TO END-CHAR-TO-HEX. 

630500 60 T0 CHAR-HEX-LOOP. 

030600 END-CHAR-TO-HEX. 

030700 EXIT. 


OSOBIO weet eee wed w as eee eee REET EER RDO EEEREERERER EEE EER eee eere 


030900 SUBSTRING-I-0. 


031000 MOVE WORK~IN-CHAR(SUB2) TO WORK-OUI-CHAR(SUBI). 
0321900 ADD 1 TO SUB2. 
031200 ADD 1 TO SuUB1. 


OSL JOO ese esate ween e ee eked eee RAAT REE EEER EERO ERE Eh te eee? 


031400 SUBSTRING-I-1. 


031500 MOVE WORK-IN=“CHAR(SUB2) TO WORK-~IN-CHAR(SUB1). 
031600 ADD 1 YO SuBe. 
031700 ADD 1 ¥O SuUB1. 


OSL BOC eee rarer a eee eee eek eee Ke REE HERE ARE HETERO ERR ERE EER EER 


O31900 PUT~SYM-SOURCE. 


032000 MOVE OUTPUT~TEXT TO WORK-OUTPUI-TEXT. 
032100 MOVE TEXT~LENGTH TO SUB1. 

032200 ADD 1 TO SuUB1. 

032700 MOVE SYMBOLIC-SOURCE TO KORK-INPUI-TEXT. 
O03. 20 MOVE 1 TG SUB2. 

032500 PERFORM SU3STRING*I-O UNTIL SUB2 EQUAL 13. 
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0326008 PAGE 
O32700 CHECK<-INPUT-STATUS. 


032800 IF TNPUT*STATUS“KEY EQUAL 0 

032.909 GO TO EXIT-INPUTSTATUS. 

033200 IF INPUT“STATUS“KEY EQUAL 20 THEN 

033300 DISPLAY SYMBOLIC“QGUEUE» “ OETACHED/UNKNOWN® 
033400 STOP RUN. 

033500 IF [NPUT“STATUS“KEY EQUAL 91 THEN 

933600 OISPLAY “MCS/OC SUBSYSTEM NOT AVAILABLE” 
033700 STOP RUA. 

O33800 EXIT<INPUT<“STATUS. 

033900 EXIT. 


OS4 OOO a ce eesaee eee eek HEREC etekeeeeeeeeeetetkerteheaeretene 


934100 CHECK-QUTPUT<STATUS. 


034200 IF OUYTPUT“STATUS“KEY EQUAL O 

034300 GO TO EXIT-OUTPUT“STATUS. 

034400 IF OQUTPUT*STATUS“KEY EQUAL 20 

034500 DISPLAY SYMBOLIC-DESTINATION» * DETACHED/UNKNOWN *, 
934600 LOCAL*CMNAND 

034700 GO TO EXIT-OUTPUIT-STATUS. 

034800 IF OUTPUT*STATUS“KEY EQUAL 50 THEN 

034900 DISPLAY "CHAR COUNT > LENGTH OF OUTPUT BUFFER® 
035000 GO TO EXIT-OUTPUT-STATUS. 

035100 IF QUIPUT<STATUS“KEY EQUAL 91 THEN 

035200 DISPLAY "MCS/0C SUBSYSTEM NOT AVAILABLE” 
035300 STOP RUN. 

035400 EXIT*OUTPUT“STATUS. 

035500 EXIt< 


03£600 END-OF “JOB. 


COMPILED WITHOUT ERRORS 
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APPENDIX C 
SAMPLE MPLII PROGRAM 
INTERFACE 


STANDARD INTERFACE 


BURROUGHS COMPUTER MAWEGERENE OYSTER 
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17 CHECK .OUTPUT.STAT US; 

17 END STATEMENT? 

17 ENO; 

17 STOP; 

17 END DC.TEST; 

0 FINI; 


GENERATION COMPLETE 
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PROCEDORE CHECK.INPUT.STATUS3 
IF CENPUT.STATUS.REY 3= OC.INPUT.STATUS] = 0 THEN ZX GOOD INPUT 


RETURN; 
IF INPUT.STATUS.KREY = 20 THEN ZX LAST TERMINAL SIGNED OF F-90Y 
00; 
MSG 3= QUEUE. NAME; 
SUBSTROMSG-13) 2 "“DETACHEO/UNKNOWN®S 
DISPLAY (MSG); 
STOP; 
ENDS 
IF INPUT.STATUS.KEY = 91 THEN 2 MCS/DC SUBSYSTEM NOT AVAIL 
00; 
OISPLAY C°NCS/0C SUBSYSTEM NOT AVAILABLE"); 
STOP; 
END> 


ENO CHECK. INPUT.STATUS; 
PROCEOURE CHECK.OUTPUT. STATUS; 


IF COUTPUT. STATUS. KEY s= DC. OUTPUT.STATUS) = 


RETURN: 
IF OUTPUT. STATUS. KEY = 20 FHEN XLTERMINAL HAS SIGNED OFF -2D0T 
00; , 
MSG == DESTINATION: 
SUBSTFROMEG*13) = “DETACHED /UNKNOWN'? 
SUBSTROMSGe 30} 2= INPUT.~COMMAND; 
DISPLAY (MSG); 
RETURN: 
END? 
IF OUTPUT.STATUS.KEY = 50 THEN 2 CHAR CNY > OUFPUT BUF LNGTH 
00; 
DISPLAY C“CHAR COUNT > LENGTH OF SUTPUT BUFFER"); 
RETURN: 
END; 
D0; 


IF QUEPUT.STATUS. REY = 91 THEN 2 MCS/O0C SUBSYSTEM NOT AVAIL 
DISPLAY C*MCS/0C SUBSYSTEM NGT AVAILABLE"); 
STOP; 
END; 
END CHECK. OUTPUT. STATUS; 
SPAGE 
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66000970) 
0060009801 
0000990) 
0001000) 
0001010) 
0091020" 
0001030) 
060001040) 
0001050) 
0@01060) 
0001070) 
00010860) 
0001090) 
00011003 
0001110) 
0691120) 
6001130) 


O THEN 2TG00D OVUFPUT 0001140) 


60901150) 
0001260) 
0601170) 
000112860) 
OOO01LYO) 
09612009 
0003210) 
0001220) 
000123053 
0001235) 
0001240) 
0001250) 
00012609 
0001270) 
0001280 
0901290) 
09901390) 
0001310) 
60013207 
0001330) 
0001340) 


COMPLEX INTERFACE EXAMPLE 


L. Jasob /OCMPLSO CN SK REC/BLK SIZES eo/ 720 TUE 31 OCT 
t CATACOM cCOcOCc1LCO 
$LIST cococ2co 
SCONTRCL 2C0 DATA 10C0 cococ3sco 
SP" E Cococs CO 
PR_.EQURE CC .TEST; cOcocs co 
SEGMENT CNC3 Ee INIT .MSG)3 cococéeco 
RE MAF CN: TQ CHARACTER(12)> cococ7 co 
CQ CHARACTER(12)» COcoCcaco 

DUMMY. STATION CHAR ACTERC12)3 cocoog9c> 

DECLARE O1 IAPUT .BUFFER CH ARAC TE RC 24 3) cocoioco 
» O2 INPUT .TEXY CH ARACTE RC 243) €oC0i1C0 

C3 SYPSCURCE CHAR ACTERC12) ¢€o0c012¢0 

e C4 ITKPUT CAT RL CHAR CHAR ACTE RC 1) C€0CO13CO 

*C& LOCAL .CCHPAAD CHARACTER (3) COCO 14 C0 

03 MCS. .CONTROL. SG CKARACTER (3) coco1is¢co 

04 CKTIRL.CKR CHARACTER(1) COCO16CO 

rC& CPYMAND CHAR ACTER(C2) €0¢017¢0 

2 C3 INI T.MSG CHARACTER (228 ) €0c018¢C0 

; €0CO19C0 

CECLARE OL OUTPUT. BUFFER CHARACTE RC 255) coco20co 
-O02 CUIPUT.TEXT CHAR ACTERC 240) C0CO21¢0 

203 GUTPUT. CHAR CHARACTERC1) cocoz2co 

202 CUTPUT.ERR CH ARACTERC15) COoco23¢o0 

; coco24co 

CUIPLT ERR 2= * a8 MSG OVFL a8; coco2zs co 

DE CL ARE DESTINATION CH ARACTERC12) Cocoz6 CO 
eTEXT.LE AGTH FIXEC cOcoz7 CO 

eT NPUT STATUS.KEY FIXEC CocO28C0 

eQUT FUT. STATUS .KEY FIXEL €0coz9Co 

eT NT ERAAL FIYXEC CO0030CO0 

-4SG CHAR AC TERC 38) ¢00031C0 

; cOcoz2C0 

DEFINE TRUE 1 &> €0003309 
FALSE 80 4; COCOI4CO 

SP AGE €0c035C0 
PRCCEOURE CHECK. INPUT.STATLS; £00036 C0 
IF CINPUT.~STATUS MEY 2= OC .IAPLI-STATUS] = 0 TKEA COCO 370 

RETURN: cocoyaco 

IF INPUT .STATUS. KEY = 20 TKEN COCO39CO 

DQ; Coco40co 

MSG <= €03 coco4ico 
SUBSTR(MSG-L?) 2= "DETACHED UNKNOWA™ 3 COCO42CO 

CISPLAY (MSG)3 cOCcO43CO 

STOP; C00044C0 

END: coco45C¢O 

If INPUT STATUS. MEY = Si TEEN COCO46 C0 

OC; €OCO47 C0 

DISPLAY ("PC S/CC SUBSYSTEM NCY AVAILABLE"); COCO4BCO 

STOP; COCO49 C0 

EKO; cocosoco 

END CHECK. INPUT. STATLS; COcoSs1 C0 
IP AGE C€0co52C0 
PROCEDURE CHECK. OUTPUT .STAIUS; COCOS53CO 
IF (CUIPLT .STATUS.KEY c= OC. QUIPUT-~STATUS] = 0 TKEA COCO54 CO 

RE TURN; Cocoss co 

IF DUTPUT.STATUS .KEY = 2¢€ IHEN Co¢cosé Co 

OC; cocos7 CO 

MSG 2= DESTIAATICN; cocossco 
SUBSTRI(MSG>L3) s= "NETACHKECSUNKNOWASS €0co59CO 
SUBSTR(MSG 230) t= LOCAL.COMMAND? cocoéoco 
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C-13 


C-14 


i€ BAG306 /DCMPLSO ON OSK REC /BLK SIZES 80/ T20 


CISPLAY (MSG), 


RETURN; 
END 5 
OUTPUT. STATUS .KEY = 5C THEN 
ud 3 
DISPLAY ("CHAR COUNT > LEAGTH OF CUTPUT BUFFER"); 
RET URK 
ENC 
IF OUTPUT.STATUS KEY = 91% IHEN 
DC; 
DISPLAY (™PCS/CC SUBSYSTEM NGT AVAIL ABLE®)3 
STOP; 
EAD; 
CND CHECK. OUIPLT -STATUS3 
IP AGE 


PROCEOURE CHAR .TO. HE XCSOURCE +S oL >P)3 
DECLARE Cl C CHARACTOCR(1)>- 

O2 CL BIT C4 )o 

O2 CR BIT(4); 


L248; 
CO FOREVER; 
eae SUBS TRCSOURC Es S51)3 
OUTFUY.CHAR(P) = CL 4 IF CL > 9 THEN 2273 ELSE 230 


oP 
OUTPUY.CHAR(P41) s= CF + IF CF > $ THEN 2372 ELSE 22003 
IF [S8:#1}) = L YTHE® UNCOS 
P se 23 
ENDS 
END CHAR.TO. hE X; 
Pace 
J FOREVER; 
DC STATEMENT; 
INTERNAL 2= FALSE; 
INPUT.CUFFER z= ="; 
DC .RECEIVE (VC, INFUT. EUFFER +243 )3 
CHECK. INPUT. STATUS? 
IF CTEXT.LENETES=0C.TEXTLEAKGTH) > 255 THEN 
TEXT LENCTH? =2553 
IF CLOESTINATION: =DC. ORIGIN] = "MCS™ THEN 
IF CNIRLJ CHR = *#™ THEN 
DCs 
IF CHMAAD="FL™ THEN 
D0; 
SUBSTRCINPUT. TEXT >IF TEXT.LENGTR > 235 THEN 225 
ELSE TEYY LENGTH) 2= © INVALIC™S 
DISPLAY(SUBSTROINFUTL TEXT OTF TEXTeLENCTE > 235 
THEN 243 ELSE YEXT-LENGTHK+E) )3 
STOP; 
EAD; . 
CISPLAY CSURSTRC INPUT. TE DT -O-TEXT.LEAGTH)) 3 
IF CeMAND="AT™ OR CHPANDS="EX™ OR CPOMANC="RA™ TEER 
OCs 
IF TEXT .LENCTH = 


15 THEN UNDO STATEMEATS 
TEXT .LENGTH : 


= DC.TEXTLENGTH =~ 16; 
= SYMSOURCE; 
INIT .MSG> 


DESTINATION 
INPUT. TEXT ¢ 
EADS 
EL SE 
IF CHMAND = "DT" OR CNPARD 
CMMAND = "AC" OR CHPAAD 
UNDO STATEMENT? 


"RE" CR 
"EQ" THEN 


noOoW 


fo 
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TUE 3] OCT 7E 


C6CO61C0 
COcCé&2CO 


“COCOESCO 


COCO64 C0 
COcoeées co 
Ccecose co 
COcoE7 CO 
cocoéeco 
Coo06sCo 
coco7cco 
Coco71C0 
Coco72co 
COCcoO73CO 
C€0C074(0 
cecorsco 
coco76 C0 
Coco?77 C0 
COCO76C0 
coco79 co 
CcocoB0CO 
cocoe&1 C0 
ccocoezco 
COCOE3CO 
COCOE4S CO 
cocceésco 
cocoeés co 
cocoa7 co 
cocogeeco 
cocoesco 
cocosocs 
CO0CO091C0 
coco92co 
cocos3co 
COocOS4& CO 
Cocossco 
CGc096 CO 
COCO97 CO 
cocosaco 
Cocog9g co 
COci coco 
Ccocicico 
€Oci1¢€1 10 
Coc1 C2CO0 
coc i c3co 
Cocicsco 
cocicsco 
cocicéco 
Cocic7 co 
Cocicaco 
COC1I CSCO 
Coc110C0 
cOci11 C0 
Coch i2co 
€O¢113C0 
COc114C0 
CoOci15 CO 
coci116c¢o 
COCc137 C0 
€oci13¢o 
COC119C0 


LE BAG306 /DCHPLSO 


ON OSK REC/BLK SIZES 80/ 720 


EL SE 


IF CHMAND = *vVaw OR CMPAAD = "TE" THEN STOF; 
END; 


EL SE 
IF CATFL.CHR = 2002 THEN 
DC; 
OLTPUTLTE XT == SUBS IRCIKPUT TEXT> Co 12)3 
OLTPUTLTEXTCL2) 2 "aa; 
OUTPUTLTEXT (13) s= *083 
OUTPUT. TEXT (14) ze "085 
QUIPUTLIE XT (15) s= "a0"; 
OLIPUTLTEYT (16) 23 "aa"; 
CHAR. 10 HEX CINPUT .TEX T+ 135354 17 93 
OLTPUT. CHAR (87) z= "Qa"; 
SUBST ROGUTPLT TEXT. 88) z= SUBST RCO INFUT. TEXT r6 €)5 
DISPLAY CSUBST RC CUIPUT .TEX Ts Co TEXT LEN(T #440)) 3 
URDO STATEMENT? 
END? ELSE 
bo; 
DISPLAY CSLESTROINFUT.TEXT-O-TEXT.LEAGTH)) 3 
UADC STATEMENTS 
END; 


IF INPUT.CNIRL.CHAR = "2" OF INPUT. CNIRL.~ CHAR = "/"™ THEN 


DGs 


OC; 


IF LOCAL .COMPAKD 
IF LOC AL~COMKAAD 
CO; 


“CS * THEN STOP; 
"SE ° THEN 


uo 


SUBSTRCINFUILTE XT 1) fs 
SUBS IRCINPUT STENT. 4, TEXT LENCTEOA)3 
TEXT.LE AGTH i- 33 
END: 
IF SUBSTRCINFUY.TEXT +153) = "DC * THEN 
DC 
TEXT.LERGTH 3 - 43 
OUTPUY.TE XT f= SUESIRCINPUT TEXT> 4> TEXT eLENCTEDS 
DC.SEAD ("OCs QUIPLT BUFFER. TEXT -LENCTE); 
CRECK OUTPUT. STATUS; 
END? ELSE 


IF SUBSTROINFUY.TE XT 2152) = "MX" AKD 
SUBSTROINPUTSIEXT>3-1) > 22F3 AND 
SUBSTRCINFUT.L TEXT 53-1) < 2342 AKD 
SUBSTROINFUT. TEXT 4-1) = °" THEN 

co; 

, TEXT.LE AGTH :- 53 

OLTPUTL TEXT := SUES IRCINPUT.TEXTs Se TEXT eLENCTEDG 
DOC.SEAD (SUBST RC INFUT.L TEXT +6163), OUIPUT BUFFER, 
TEX T.LEMGTH De 
CRECK OUTPUT. STATLS3 
ENDS ELSE 


IF. INPUT.CATFL .CHAR = "/" THEN INTERKAL = TRUE? 
IF SUBST RCINPUT.TEXT51,44) = "MCS * THEA 


OC; 
SUES TRCINPUT TEXT» 1) c= 
SUES TRCINPUT .TEXT oS» TEXT -LENCTE-“S)3 
TEXT LENGTH 2- 435 

EAD; 


CUTPUT .CHARTC) := 20033 
SUEBSTRCOUTPUT.L TEXT sIF INTERNAL THEN 1 EL SF 0) c= 
SUBSTRCINPUY .TEXY+ 1, TEXT eLENGYH-1)3 
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TUE 31 


Ce0c120C0 
Cocir21i Co 
CoOc1 e200 
C€OC1 230 
COCE 24 C0 
001250 
Ceci 26 C6 
COCiLz2700 
€Ot128CO 
COC129C9 
Coc130C0 
00C€12710C0 
CO0132C0 
Coci 73 C0 
Coc1 740 
€oci1 350 
COc2 3600 
Coc137 co 
Coci3aco 
COCi139C0 
COC140C0 
€OC141¢0 
CoCr 4&3C0 
COC144 C0 
Coci 450 
C0C146 C0 
COCi 47 C0 
€oc148C0 
coci49C0 
cocisoco 
COCTrSE CO 
cocis2co 
Coci 53 co 
co0ci54C0 
CoOcis5 CO 
€0C156C0 
cocis7 co 
cociseco 
COC159 C0 
cociecco 
Coci61 C0 
cocié2co 
Coci1e€3Co 
COCi 64 CO 
Coc165 CoO 
COC166C0 
CoOC1€e7C0 
CO0¢c168C0 
coC1€9CO 
Coci?70co 
€0c1 710 
coci72co 
Co0c173C0 
Coc174C0 
COci 75 C0 
Co0Cc1i76C0 
€0¢€177 C0 
COCi78C0 

0ci79Co 
0¢€1 @0C0 


OCT 7: 
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ILE BAG3IO0& /DCHPLSO 


CN OSK REC /BLK SIZES G0/ 7240 


CC -SENCO™MCS". CUIPUT .TEX 1, JEXT LENGTH) 3 
CHECK. CUIPUT STATUS; 

DO FOREVER; 

OC RECEIVE CCC. INFUT. BUFFER ,243); 


CHECK. INPUT. 
TEXT .LENGT 


ATLS; 
“DC. TEXTLEAGYHs 


| 
tm 
t= 


IF SUBSTRCODESTINATION+CeZ) = "HX" AND 
SUBSTR(CESTIN‘T ION, Z61) > *O2FQ"% ANE 
SUBSTRODESTINATION+ Ze3) < "2403" ANE 
SUBSTRCCESTINATIONs 351) = *" THEN 

OUTPUTLYE xT 2 = INFUY. TEXT: 

EL SE 

pc; 


OUTPUT. CHAR (CO) "3a75 
CRAR. TO «HEX CI APLUT AT EX Te Ce 361)3 
OUTPUT.CHAR (7) "sar; 


IF INTERNAL AND SUBST RCOINPUTL TEXT +353) s= 722 7 THEA 


DO} 
CHAR LTC. PEXCINFUT.TEXT 63 -TEX TA LEAGTH-3 4893 
TEXT LENGTH t* TEXT.LEAGTHS23 

END> ELSE 

D0; 

SUBS IR(DUTPUI.TEXT»8) t= 
TEXT «LENGTH 24 53 
END > 


SUBST RCINFUT. TEXT +3): 


EAD; 


IF DC.ENDKEY /= 


END; 


SUESTRCOUTPUT. EUFFER-TEXTA.LEKGTH41). c= 
IF DESTINATICN = 


ELSE 


END>s 
END; 


¢ THEN UADC? 
IF SUBSTRCDESTIAATION+0+2) = "MX" THEA 
DC-SERADCDESTINATICON -OUTPUT. EUFFER TEXTS LEAGTH-E BI D2 
ELSE IF SUBST RCOCESTINATION+ OFZ) = "ID" THEN 
OC; 
SUES TR (QUFPUT.LEUFFERS TEX TALE AG THel ) alld; 

OC SENCCCE STINATIONN. CUIPUT .BUF FER, TEXT -LENCT E+ 1) 
EDs 
ELSE IF DESTIAATICN = "DC" THEN 
DISPLAY C SUESTRCOLT PUT. BUFFER SO +TEXT.LEAGTH41 ))5 
ELSE CO.SENCCCESTINATION, CUIPUT.BLF FER, TEXT .LENCT HE) 
CKECK .OLT PUT. STATLSS 


ss. 
— 


BC.CRIGIN; 

“OC™ THEN 

DISPLAY CSLBST RO CUTPLT KRUF FE Re Ce TEXT -LENCTEO13 35 
DC.SERD CD ESTINATICN-OUTPUT. BUFFERSTEXTALEAGIH4123)3 
CFECK .OUT FUT. STATUS; 


ELSE 


OUTPUT .TEXT> =I NPLTCYEXT> 


IF TEXT~-LEAGTH > 240 TREN TEXT .LENCTH 
CC -SENCCDE ST INAT JON OUTPLT -BUF FER, TEXT.LE 


CHECK. CUEPUT .SYATUS; 


END; 
EKD STATERMERTs 
tNOs 
S10 F> 
ENT DC «TEST? 
FINI> 
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C-16 


TUE 


cd 


cocieico 
cocie2co 
cocresco 
Coc} 64 C0 
coci €SCo 
coci @6 CO 
Coc1 &7 C9 
cOcieaco 
¢oci1e9co 
COc1¢0C0 
COC191C0 
COC1 $2C0 
COCISg3CC 
00C1 94 CO 
C0ci95C0 
COCL96CO 
COCi97 CO 
COCi38CO 
COC199CO 
cOCc2C€0C0 
coc2c1co 
COoC2c2Cc0 
Coc2c3co 
cocecé co 
coc2csco 
Coc? cé CO 
COCcec7 CO 
coc2csco 
coc2c9 co 
€0€210C€90 
€0¢€211C0 
€06212C0 
CcOC213CO0 
€OC214C0 
€0c235C0 
€O€216C0 
€0C217C0 
COC218CO 
cocz19C90 
cocezcco 
Coc221¢0 
COc2z2C0 
COC223C0 
cCoc2 24 C0 
COC225C0 
COC226C9 
COC227 CO 
COc228CO 
COC2 ¢$ C0 
COC230C0 
Ccoc2 310 
COC232C0 
€OC233C0 
CoC234 (0 
coc2735¢0 
cOc2 36 C0 
COC237 C0 
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APPENDIX D 
DIAGNOSTIC TOOLS 


This appendix, which is provided as an aid to DC application programmers, contains information about 
diagnostic procedures in TDS and the format of the output from these procedures. The primary diagnostics 
available are the DEBUG option, the trace function (GT), and the various TDS logs. Refer to Section 3 for 
the proper command syntax for invoking and/or accessing each of these features. 


DEBUG Option 


The DEBUG option gives a formatted listing of each message header handled by TMCS. Figure D-1 
is a sample output from TMCS with the DEBUG option set. The meaning of each field is as follows: 
LINE: Contains the logical line number associated with this message. 


RESULT: Contains an index value indicating any special condition associated with this message. The 
defined values for RESULT are: 


complete and successful 
line not ready 

station not ready 
control or WRU flag set 
recalled from station 

- recalled from subnet queue 
- station not attached 

- unable to initiate 

- invalid network request 
9 - DC hardware error 

10 - DIALIN received 


CONN MA Rh WN = © 
' 


TYPE: Contains a value indicating the message type as follows: 
0 - maintenance 

input 

output 

priority output 

enable input 

disable input 

make station ready 

- make station not ready 

make line ready 

- make line not ready 

10 - dialout 

11 - immediate line not ready 

12 - recover 

‘deallocate 

dialin 

15 - SPO input 

16 - end recall from queue 

end recall from station 

18 - attach: queue 

19 - attach station 

20 - enable queue 

21 - enable station 

22 - disable station 

23 - disable station 

24 - send 

25 - task detach 


' 


Oo co~I a Ur & WN 
' 


joe peut 
ba Ww 
' ' 


end 
~ 
' 


TASK: Contains the number of the task in which the message originated. Valid values for user tasks 
range from | through 9. 
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EVENTS 
008000 
EVENTS 
008000 
EVENTS 
000000 
EVENTS 
000000 
EVENTS 
000000 
EVENTS 
000000 
EVENTS 
000000 
EVENTS 
000000 


TA 
00 

TA 
00 

TA 

00 

TA 

00 

SKP RTY BKN TRN TA 
00 0 00 
9KP RTY BKN TRN TA 
00 0 00 
SKP RTY BKN TRN TA 
00 94 00 
SKP RTY BKN TRN TA 
00 0 00 


Figure D-1. Debug Output 


DATE TIME MC SDATA 
770228 240000 0000 
DATE TIME MCSDATA 
770228 240000 0019 
DATE TIME MCSDATA 
000000 000000 0000 
DATE TIME MCSDATA 
000000 000000 0019 
DATE TIME MCSDATA 
000000000000 0000 
DATE TIME MC SDATA 
000000 000000 0000 
DATE TIME MCSDATA 
000000000000 0019 
DATE TIME MCSDATA 
000000000000 0000 


MCS FLAG: Indicates, by setting the least significant bit, that the MCS is to be notified of the results 
of this output message: 


1. Only if errors occur (bit = 0) 
2. Whether or not errors occur (bit = 1) 


STATION: Contains the logical station number associated with this message. 


OPTIONS: Contains the eight 1-bit flags listed below, which are available for use by the NDL program 
and the DC firmware. 


7 - LINE FEED. 

Outputs a linefeed character. 
6 - CARRIAGE. 

Outputs a carriage return character. 
5 - PAPERMOTION. 

Moves paper before printing. 


4 - PAGE. 
Advances page. 
3 - SKIP. 


Skips to channel. 
2 - TRANSPARENT. 
Message contains TRANSPARENT text characters. 


1 - BLOCK. 
One block (but not the last) of a multiblock message. 
0 - SPACE. 


Advances line(s). 


These flags were intended for use in forms control; however, their actual meaning, if any, is determined 

by the NDL programmer. 
EVENTS: Contains twenty-four 1-bit flags (listed below), which are set by the data communications 
subsystem to indicate conditions which occurred on the line while processing this message. 


23 - NAK received 

22 - NAK on select 

21 - NO SPACE 

20 - TERMINATE ERROR 

19 - DISCONNECT 

18 - TERMINATE NO LABEL 

17 - ADAPTER FAULT 

16 - MODEM NOT READY 

15 - CONTROL CHARACTER RECEIVED 
14 - WRU CHARACTER RECEIVED 

13 - TRANSMISSION NUMBER ERROR 
12 - MESSAGE LENGTH EXCEEDED 

11 - EVENT 1 

10 - FORMAT ERROR 

9 - BCC ERROR 

8 - ADDRESS ERROR 

7 - SYNCHRONOUS TRANSMISSION UNDERFLOW 
6 - BREAK ON TRANSMIT 

5 - LOSS OF CARRIER 

4 - CHARACTER PARITY ERROR 

3 - BREAK ON RECEIVE 

2 - BYTE OVERFLOW-SERVICED TOO LATE 
1 - STOP BIT ERROR 

0 - TIMEOUT 
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. If one or more of the following flags has been set, the line associated with this message has been implic- 
itly made not ready and the appropriate value has been placed into the RESULT field: 
DISCONNECT 
ADAPTER FAULT 
MODEM NOT READY 


a if one or both of the following flags has been set, the station associated with this message has been 
implicitly made not ready and the appropriate value has been placed into the RESULT field: 


TERMINATE ERROR 
TERMINATE NO LABEL 


Events During DIALOUT 


Contains eight 1-bit flags (listed below) which are set by the data communications subsystem to indicate 
conditions which occurred on the line while processing a dialout message. 
23 - RESERVED 


22 - RESERVED 
21 - INVALID OR NO ANSWERTONE AFTER PULSE DIALING (NON-ACU MODEM) 


19 - ACR BUT NO DSS AFTER AN ACU-DIALOUT 
18 - FIRST PND WAS SENSED BUT SUBSEQUENT PND’s WERE NOT 


17 - ACR WITHOUT FIRST PND 
16 - PWI WAS NOT RESET OR DLO WAS SET AT START OF ACU-DIALOUT 


SUBNET QUEUE: Contains the subnet queue number associated with this message. 
TEXT LENGTH: Contains the number of text characters present in this message. 


MESSAGE LENGTH: Read only by the user. Contains the total number of BYTES of space available 
for text in this message. Its value is always greater than or equal to the value of TEXT LENGTH. 


SKIP CONTROL: Contains a value to be used in connection with the OPTIONS field (for example, 
it may contain the number of lines that are to be skipped). The actual meaning of SKIPCONTROL is deter- 


mined by the NDL programmer. 


RETRY: Contains the NDL retry count associated with this message. The maximum value the user may 
assign to retry is 254. The value 255 is reserved for system use. 


TRANSMISSION NUMBER: Contains three ASCII characters indicating the transmission number (000 
through 999) received with this input message. 


TALLIES: Three separate 8-bit binary fields whose use and meaning is determined by the NDL pro- 
grammer in cooperation with the user. 


TOGGLES: Eight I-bit flags whose use and meaning are determined by the NDL programmer in coo- 
peration with the user. 


DATE: Contains the data relevant for this message. It is given as six binary coded decimal digits in 
the form YYMMDD (year, month, day). For input messages, this field is filled by the DC firm- 
ware when the message is received. For output messages, it is the user responsibility to fill 
this field. 


TIME: Contains the time of day relevant for this message. It is given as six binary coded decimal digits 
in the form HHMMSS (hours, minutes, seconds). For input messages, this field is filled by the 
DC firmware when the message is received. For output messages, it is the user’s responsibility 
to fill this field. 


MCS DATA: This field is for the use and convenience of the MCS only. It is initialized to 0’s on incom- 
ing messages by the DC firmware and is unaltered at all other times. 
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LENE RS TYE FASK MCS USw OPT EVENTS SUBN TELM MSGL SAP RTY BAN FAN TA FAG TA2 TOG OATE YImC mC SOATA 
9 #9 1 0 0 25 G@ 000000 0 a9 4? 00 #10 0 o43 60 oe 660 00 FrO276 240006 0019 

THIS £5 & TEST OF THE TRACE FUNCTION WITH YORE... 

SHEBROTSZURFSTZOGE SOS ASSSS4 2U OF LE2GS4ABES2ODASZRTATESZOCESSAL ASS AAOEF LE ZOS 7 ESSE 4B 205E4S SOSA 2E ZE2E 

LINF @S FYPE TASH MCS ESN OPT EVENTS SUBN FXLN MSGL SKE REY OXW TRN TA $fA0Q TA2 TOG DATE TIME "IC SOATA 
o 90 2h 2 Oo 2% 4 000000 6 49 49 00 10 00 ov 00 00 000000 000000 0000 

THIS FS A TEST OF THE FRACE FUNCTION WIth TExt... 

SHRBAISSZLORFSSAGELANSE ASS ISS SUSE E205 HEBRS AO PSZELOSRSZOCOSSAE RISE APAF LE ZOS7E9S44H 2058465 8 8SAZEZEZE 

Live KS TYPE TASHR MCS USN OF EVENES SUN EXtN MSGE SKP REY BAM FRN TA Ta TA? TOG DATE TEME Mt SOATA 
6 9 1 0 Oo 25 & 600000 0 a6 AO OO 10 0 @Q4s 06 00 60 O00 776226 240000 C019 

NO4 TO SENO A MESSAGE OVER ACD OVER UNTIL WE GET A MESSAGE OVERFLOW. ca cece wesace 


GEG OP 205K MF 2ZOSSHSRE EH ZORT ZO WL ASSSSSALATAS2O4F SERSS2ACOKIGE 64 204F SEGSS2ZOS5S4E 546 KDC 2057 ASZOKFASS4 204120 CDASSISSAL OIF ASZO4F 564552 464C OF 
DFCEZE ZEAE 2EZE CE ZEZE CE ZE ZEEE 


LINE RS FYPE YASA MCS ESN OPT EVENTS SUUN TXEN MSGL SKP RITY BRN TRN TA YAO Yaz FOG OATE TIME MCSOATA 
o 9 24 2 & 25 4 000000 0 80 80 60 #10 00 oo 600 GO 0606000 000000 00600 
NOW TO SEAD A MESSAGE OVER AND OVER UNTIL wE GET A MESSAGE OVERFLOW. Cc cece cece we 


GE RFS 2054 OF 2OSSASLE SA ZORLZTORDESSISSALRSTASZ04F SEGSS2ZO4G TLE GA2ORF SEKSSZZOSS4RE VAGGRC 2O57 ES LOA ASSAZOKLZOAOASSISIAIOTASZOAFR SGORSS2 464C OF 
SFOECEZE2E2EZE2CZ2E 70 2E2E 228 


Cink RS FvPE TASK MCS LSh OFF EVENTS SUAN FRXiM MSGLE SKO REY OKN TAN TA FAO TA2 FOG DATE YIME MC SOATA 

Oo.) h68 i 6 6 25 o 6060000 0 {60 2860 60 10 6 O45 906 oo 600 00 Froz28 240000 0019 
ww FC StAD & MESSAGE OVER &2nNL OVER UNTIL WE CER. A MESSAGE OVERF LOM, ence meee een se NUM F0 SEND A MESSAGE OVER AWD OVER UNTIL WE GET A PhP 
ESSAGE AGE REFLOW ce cece cc caae 
BE GES? POSE 205 3 aS GER ZCAEZO QU ASSSSSHLAPASZOSF SEMSSZAZOGLEE MAZOAF SEASSZZOSSAESAAPRC ZOSF AS «=P ASSRZOKI 20 ADESSISTALATASZOAF 564552 464C OF 
S/7F 2EZE 2EZE CE ZE2E SE ZE2E 28 2E ah AE SF 2OSGEF 2ZOSS ADEE 44 ZOKRE COED ASSESS GLAFESZORF SERSS2ZOCLAE RK AF SEASSZTZO55 MESEAGACZO57 452007458 542048170 OC 
ASOD GOL ETAS2OGF 560552 66 GC AF ST ZE SL OE 2E CE OE 2E 2b ZEZE ZOE ZE 
LINf RS TYPE TASK MCS th OFF EVENTS SUHN FRKEN MSGL SAP REY OGtw THN TA YAO FA2 TOG OATE TIME RUSOATA 

6 94 24 ra 6 25 @ 000000 Q 160 160 00 10 60 Ov 00 00 0606000 6000006 0000 
MO 1G SEAD A MESSAGE OVER ANO OVER UNTIL WE GET A MESSAGE OVERFLOW cc cee mecca es NOK FO SEND A MESSAGE AVER AND OVER UNTIL WE GET A rr 
bE AL ST 205K 4F 2O5SKSAF GHZO4DZOELESSISSEEGTAS 2068 SERSSZZG41 AE GAZO4F SEASSZZ055 OL 244940 2057 45204745 54204120 KD OS DES SGT SP ASZOOF 5646552 4640 OF 
SP Pt OE 2E OE SE CE 2E2F 7E 20 2E 26 20 EAE Oe 2OSGAF ZOS SCORE AA ZONE 2ZO4D ESS SS IAERF AS ZO4F SE4SS2ZZOCL AL AAO“ SERSS720 5 RESHOPAC 2057 4520674554 204120 40 
RSUUESSSEOSZASZOGF 56455266 6C4F SP2EZEZEZECEZE ZF 2t 202 2E 26 2k 
LInNt #5 TYPE TASH MCS LSW Of FVENTS SUBN TKEN MSGL SMP RTY @KN TRN Ta TAG YA2 TOG OATE TIME AC SOATA 

9 Oo ! 0 0 25 € 0000906 6 $20 $70 06 16 6 G46 O06 69 a0 OO FYOGO276 240000 O09 
NUd TO SEND A MESSAGE OVER ANL GVER UNT EL WE CEP A RESSAGE OVERFLOW. Ce cw cc cece ee NIM TO SEND A RESSAGE OVER AND OVER UNTIL WE GET A F&F 
CUSAGE VERE LOM cc ee www eee ee HUM FO SEUD A MEDSAGE OVER AND OVER UNTIL WE GEE A MESSAGE OVERFLOW. ce cw ee ee eee NOW TO SEND A OM 
GEGFS7ZO5S4F ZOSIRSAE GA ZOELZOCUGSSISIALATAS ZOO SEALS ZZORTSE BOCOOE SO4S5S22055 48 PREFAC 2ZOSTASZORFESSAZOSIZOADASSISSALATASZO4F S646552 4GAC OF 
SP 7E ZF 2026 26 26 28 2028 ZO 2E ZEEE ee AF OP ZOSRGE 2OS FES GE AA ZOE 2ACADLISSS IOLA TAS ZOGF SESS ZZ0EL OE FO Z2O4F 5645522055 FE DEE98C 2057 4520 6745546204120 CL 
OSNSSSAEASENZOGF SO4SS2 4G ACE DS 20 2E2E QE ZF OE AF 2EZEZEZE CE SCRE ME SF 20546 OF 20S SESE RR ZOREZOAD ASSES SALI AS 2048: $645527 2061 4E RA Z04F 5645522055 bt 
SEAFEC ZOD7 ASCO RTASSAZOAEZOEDESSSSSOLATASZOGF SERSS7COAC OFS 20 CL ZE2E 26 26 20 2€ 26 2¢ 26 ZE ZE GE OF SF 20548 OF 205345 40 44 20412040 
LIE RS TYPE TASH PCS CShW GAT EVENTS SUUN EXEN MSGL SKP REY GAN FRN TA 240 Fa2 TOG DATE TEME ACSOATA 

o 608 24 2 o 25 & 600500 0 255 259 60 10 00 Go 906 G06 060000 000000 0060 
004 TC SOCKS A MESSAGE OVER A£2nD OVER UNTIL af GEE A RES SAGE OVERFLOW... eee e ee ene NOM FO SEND A MESSAGE OVER AND OVER UNTIL WE GET A PF 
ESSAGL OVERFLOW Cc cee eee eee LK TO SEND A MESSAGE VER AND OVEN UNTIL WE GET A RESSAGE OVERFLOW. cc cee ecw eee es 8 MSG OVFL af 
BE GEST FO VA EF 2ZO5 FASO AA ZORTEZOCUASS ES FO DLO FES 2046f SEASSDZZOAL EE OO Z04F 564992205948 DAEFEC 2097 ES ZORTESSEZO4GL ZC ADASSASSAESTASZORF 564552 SO4C 4F 
SF 2t Cf PE CECE ZOE OO 28 28 ZE 2E 2E ZF ak SF OP FOSK AF 209345 4F A 2O4EPOAU ASSESS OLETES ZORF SE4SS 77041 OF 84 2ORF 5665522055 E54 49460 2057 C52047 4554206170 00 
HS IS VARGAS CORFE SE45592 CE ACOF OF ZEZEZEZEZE 26 20 2b 2E 20 28 26 2E AE CE ST 2OSG AF ZCS SAS SE RK ZORE 2000 AS SY T02 OF ESZO4 SEAS Z70414E MEZO4F 56459522055 at 
BREF EE 2057 6520 D7 RSSEZORL2OEO ASS ESSA TR FRSZOAF VORSS ZEEE SF SIZE 2E2E ZOE 28 26 2626 2E2E 2E ZC 2E ZOZESTZOCOS FAT 200 $64646€ 202523 
Liwe RS FYPC TASK MCS CSA Gel EVENTS SUUN FKEN MSGL SKP KEY BW TRAN TA TAO TaA2 TOG DATE TIME =i SOATA 

o.6hlU8 1 0 0 2% wu ooc6to 0 493 4% vO 10 Oo O48F 06 60 696 OO F7O2278 206006 OOL9 
feES CONCLUDLS THIS FEST OF TF FRACE FURCTIUR... 
GAA G9S S2C4 SOF SE &SLC554665552056 40695 520546 455556 2O4F 46 205468452094 5241 6 F452046554E 6554 CO4FSE 2E 2E ZE 
CINE WS TYPE TASK MCS CSW OCF EVENTS SUBN FKEN MSGL SAP RTY BEN IRN FA FAO FA2 TOG OATE FEIME MC SOATA 

6.669 24 2 Q@ 25 & 600000 ce) 49 a? GO 130 06 ov 660 06 CO6000 0006000 0900 
THIS CONCEUPOCS TrerS TESE CF FHE ERACE FUNCTION... ; 
Be EREYS SEM EGE EE ESET SS EGESDEZUSHMBEISSZOSE ASD ESAZO4E AG ZOE RBRSZOSASZELA SAS 7FOCKSSALASSALO4FE OE ZE2E2E 
LINF RS FYPE TASK MCS CSW O47 EVENTS Subnh TEEN MSGL SKP REY HAN TRM TA FTaG FA2 FOG HATE TIME “CSOATA 

9 869 i Qa 0 25 o 069000 a 5 $900 10 0 648 60 oo 6000 OO 7F7G228 240000 0089 
FNS 
1Faans 


Figure D-2. Trace Output 


Trace Function (GT) 


The trace function provides the user with various types of information depending upon the syntax of 
the GT message entered. Figure D-2 shows an example of a trace output when the GT syntax was: 


DC GT S 25 TEXT HEX 


This trace gives a listing of all messages to/from logical station 25 including message headers and mes- 
sage text (both graphic and hexadecimal representations). 


TDS Logs (Event, Error, Control) 


The three logs maintained by TMCS log messages for later reference. At present, TMCS has a list func- 
tion for these logs (LL) which consists of a hexadecimal dump of the contents. A program may be written 
if a more structured output is desired. Figure D-3 is a sample log list program. Figure D-4 is the output listing 
from this program. 


D-5 


CoaON OVE Ut NN et 


D-6 | 


000100 
000200 
000300 
000400 
000500 
000600 
000700 
000600 
000900 
001000 
001100 
001200 
001300 
001400 
001500 
001600 
001700 
0014600 
001900 
002000 
002100 
002200 
002300 
002400 
002500 
002600 
002700 
002800 
002900 
005000 
003100 
603200 
003300 
003400 
003500 
003600 
003700 
003800 
003900 
004000 
004100 
004200 
004300 
004400 
004500 
004600 
004700 
004800 
004900 
005000 
005100 
005200 
005300 
005400 
005500 
005600 
005700 
0058600 
005900 
006000 


IDENTIFICATION DIVISICN. 


PROGRAM~I0. 


TOSLOGLIST. 


ENVIRONMENT DIVISION. 
INPUF"OUTPUT SECTION. 
FILE-~CONTROL. 

SELECT LOG-IN ASSIGHA TO OISK. 
SELECT LOG-LIST ASSIGN TO PRINTER. 
DATA DIVISION. 
FILE SECTION. 


FO 


01 


01 


Rae AREER EK AA HKaAH KEKE KRA RHEE KEK aAMKRAHR KR RRA KEKE HEE EKRHRKKHEKHE RE KK AE EK AR KEE K SE 


C=EVEAT CLOG; 


& 


th bk thee tae naeake ee KR hte het e eae aRe ea hk etek eek eke tha hath haha RARER 


FO 
01 


LOG-IN 

VALUE OF ID IS FRAME. 
LOG-HEADER. 

03 tOG-WRAP PIC X. 


O3 FIRST+LOGICAL PIC 9999 COMP. 
O03 ERR-COUNT PIC 9999 COMP. 

03 CONTROL-COUNT PIC 9999 COMP. 
O3 LAST-TERM-REC PIC 9999 COMP. 


03 HOW-TERMEO PIC X. 


O03 SIZE-OF“LOG PIC $999 COMP. 
03 LAST“LOGICAL PIC 9999 COMP. 


O3 FILLER PIC XC66). 
LOG-RECORD. 
03 tOG-DATA. 


05 LOG-TYPE PIC 99 COMP. 

OS MESSAGE*TYPE PIC 99 COMP. 
05 LOG-RECORO-COUNT PIC 9(04) COMF. 
05 tOG-DATE PIC 9€6) COMP. 
O05 LOG-TIME PIC 9€6) COMP. 


O03 LOG-TEXT. 
05 LOG-TEXT-1. 
O07 MSG-HOR. 


09 FLO-MHI PEC 9€10) COMP CCCURS 7 TIMES. 

O07 LOG-TEXT-1A PIC XC91). 

OS LOG-TEXT-X REDEFINES COG-TEXT-1. 
O7 FILLER PIC XC(3). 

O7 FLO-X PIC XC123). 

05 LOG-TEXT-2 PIC X44). 


LOG-TYPE : 
MESSAGE TYPE: O=COMMENTS 
LOG~LIST. 

LIST-RECORO PIC XC132). 


WORKING-STORAGE SECTION. 


01 


LINE“CQUNT PIC 99 VALUE 5. 
F-NAME PIC XC€C12). 

AX-IN PIC X. 

REC-CNT PIC 9€4). 

I PIC 99. 

CHECK-TYPE. 


I=ERROR LOGs 


L1=MESSAGE; 


O3 FILLER PIC X VALUE 70". 
O03 CHECK-BYTE-2 PIC X. 

O3 FILLER PIC X VALUE "2a". 
03 WORK-HKEADER PIC XC(70). 
O3 FILLER PIC X VALUE “eo”. 
O3 WORK-REST PIC ¥C5S4). 
WORK-~HSG. 

O03 FILLER PIC X VALUE “2”. 
O3 WORK~-FETICH PIC XC€6). 


2=CONTROL LOG 
2=COMPUNICATE 


Figure D-3. Sample Log List Program (Sheet 1) 


t 
. 


006100 
006200 
006300 
006400 
006500 
006600 
006700 
006800 
006900 
007000 
007100 
007200 
007300 
007400 
007500 
007600 
007700 
007800 
007900 
008000 
006100 
008200 
006300 
008400 
008500 
008600 
008760 
008800 
008900 
009000 
009100 
009200 
009300 
009400 
009500 
069600 
009700 
009800 
009900 
010000 
010100 
010200 
010300 
010400 
010500 
010600 
010700 
010800 
010900 
011000 
011100. 
011200 
0113300 
011400. 
011500° 
011600 
011700 
011800 
011900 
012000 


01 


01 


01 


01 


03 
03 


FILLER PIC X VALUE ™a". 
WORK-REMAIN PIC X€118). 


HEADING-RECORD~1. 


03 
03 
03 


FILLER PIC X(€56) VALUE SPACES. 
HDG-1 PIC X€19). 
FILLER PIC X€57) VALUE SPACES. 


HEADING~RECORD-2. 


03 
03 


03 


FILLER PIC X€4) VALUE SPACES. 

FILLER PIC X(50) VALUE 

“LOG TYPE MSG TYPE RECORD COUNT DATE 
FILLER PIC X€78) VALUE SPACES. 


OUT-~RECORO-1. 


03 
03 
03 
03 
03 
03 


03 
03 
03 
03 
03 


FILLER PIC X€7) VALUE SPACES. 
LTYPE PIC 99. 

FILLER PIC X€9) VALUE SPACES. 
MTYPE PIC 99. 
FILLER PIC XC9) VALUE SPACES. 
REC“CNI-A. 

05 CNT PIC X OCCURS 4 TIMES. 
FILLER PIC X€6) VALUE SPACES. 
LDATE PIC 99799799. 

FILLER PIC X VALUE SPACES. 
LYTIMNE PIC 99:99:99. 

FILLER PIC X€76) VALUE SPACES. 


OUT-RECORD-2. 


03 
03 


FILLER PIC XC6) VALUE “TEXT: ©. 
LTEXTL PIC X€126). 


OUT=RECORD-3. 


03 
03 
03 


FILLER PIC X€6) VALUE SPACES. 
LYEXT2? PIC X€44). 
FILLER PIC X€82) VALUE SPACES. 


HAS“WRAPPEDO. 


03 
03 
03 


FILLER PIC X€20) VALUE SPACES. 


TIME®. 


FILLER PIC X€22) VALUE “LOG HAS WRAPPED AROUND". 


FILLER PIC X€90) VALUE SPACES. 


HASNOT-WRAPPED. 


03 
03 
03 


FILLER PIC X€20) VALUE SPACES. 


FILLER PIC X€26) VALUE “LOG HAS NCT WRAPPED AROUND". 


FILLER PIC X€66) VALUE SPACES. 


LOG-PRINT-1. 


03 
03 
03 
03 


FILLER PIC X€20) VALUE SPACES. 

FILLER PIC X€16) VALUE “LOG FILE SIZE = “%. 
LOG-SIZE PIC xX(4). 

FILLER PIC X€92) VALUE SPACES. 


LOG-PRINT<2. 


03 
03 
03 
03 


FILLER PIC X€20) VALUE SPACES. 


FILLER PIC X€24) VALUE “FIRST LOGICAL RECORD AT *. 


LOGICAL~-1 PIC XC€4). 
FILLER PIC X€84) VALUE SPACES. 


LOG-PRINT-3. 


03 
03 
03 
03 


FILLER PIC X€C20) VALUE SPACES. 

FILLER PIC X€23) VALUE "LAST LOGICAL RECORD 
LOGICAL~2 PIC XC4). 

FILLER PIC X€85) VALUE SPACES. 


tL OG-PRINT~4. 


03 
03 
03 
03 


FILLER PIC X€20) VALUE SPACES. 

FILLER PIC X€20) VALUE *ERROR LOG EATRIES = 
COUNT-ERROR PIC X€4). 

FILLER PIC X€C88) VALUE SPACES. 


LOG-PRINT-5. 


Figure D-3. Sample Log List Program (Sheet 2) 


AT ”. 


D-7 


D-8 


012100 
012200 
012300 
012400 
012500 
012600 
012700 
012800 
012900 
013000 


013100 


013200 
013300 
013400 
013500 
013600 
013700 
013600 
013900 
014000 
014100 
014200 
014300 
014400 
014500 
014600 
014700 
014800 
014900 
015000 
015100 
015200 
015300 
015400 
015500 
015600 
015700 
015800 
015900 
016000 
016100 
016200 
016300 
016400 
016500 
016600 
016700 
016800 
016900 
017000 
017100 
017200 
017300 
017400 
017500 
017600 
017700 
017800 
017900 
018000 


OS FILLER PIC X€20) VALUE SPACES. 


O3 FILLER PIC x€22) VALUE “CONTROL LCG EATRIES 


03 COUNT-“CONTROL PIC XC4). 

O53 FILLER PIC X€86) VALUE SPACES. 
O1 COG-PRINT-6. 

O3 FILLER PIC X€20) VALUE SPACES. 


O3 FILLER PIC XC28) VALUE "TMCS WAS TERMINATEO ABRUPTLY”. 


O3 FILLER PIC X€64) VALUE SPACES. 
01 COG-PRINT~7. 
O03 FILLER PIC X€20) VALUE SPACES. 


O3 FILLER PIC XC€C30) VALUE "TMCS WAS TERMINATED GRACEFULLY". 


O3 FILLER PIC X€862) VALUE SPACES. 
O1 LCOG~PRINT-86. 
O3 FILLER PIC X€20) VALUE SPACES. 


O3 FILLER PIC X€21) VALUE “LAST TERM COMMANDO AT ™. 


O03 TERM~LAST PIC XC€4). 
O03 FILLER PIC X€87) VALUE SPACES. 
O01 WORK-~MIYPE~1. 
O03 FLO-MHA PIC 9010) OCCURS 7 TIMES. 
O1 WORK-MTYPE"LA REDEFIANES WORK-MTYPE-1. 
O3 MSG~ALPH PIC X OCCURS 70 TIMES... 
PROCEOURE OIVISION. 
BEGINNING-OF~-JOB. 


DISPLAY "ENTER LOG TYPE: O=EVENT? 1=ERRORS 2=CONTROL". 


ACCEPT AX~IN. 

OPEN OUTPUT LOG-LIST. 

If AX-IN EQUAL “%0” 
MOVE "EVENT LOG LISTING * TO HOG-1 
MOVE "“TDS.EVLGG" TO F-NAPE. 

IF AX-~IN EQUAL "i" 
MOVE “ERRGR LOG LISTING ®* ¥O HDG~-1 
MOVE “TDOS.ERLOG™ TO F-NAPME. 

IF AX-IN EQUAL “2" 
MOVE “CONTROL LOG LISTING™ TO HDG-1 
MOVE “TOS.ERLCG™ TO F-NAPFE. 

IF AX-IN GREATER THAK "2" OR LESS THAA “0” 
CISPLAY “ERROR IN LOG TYPE ENTRY™ GO TO 

MOVE AX~-IN TO CHECK-BYTE~2. 

OPEN INPUT LOG-IN. 

HEADING-ROUTINE. 

MOVE SPACES TO CIST-RECORDO. 

WRITE LIST“RECORD BEFORE ADVANCING PACE. 
WRITE LEST"RECORD FROM HEAOING~RECORC~12 
BEFORE AOVANCING 1 LINE. 

WRITE LCIST-RECORO FROM HEADING~RECORD-2 
BEFORE ADVANCING 2 LINES. 

READ~LOG-HEAD. 
READ LOG-IN AT ENO GO TO CLOSE-OOWN. 
PERFORM CHECK~LOG-HEAD. 
READ-WRITE-LOOP. 
READ LOG-IN AT END GO TO CLOSE-OOWN. 
MOVE 1 TO TI. 
MOVE. LOG-~FYPE TO LTYPE. 
IF LTYPE NOT EQUAL CHECK-TYPE 
GO TO READ-WRITE-~LOOP. 
MOVE MESSAGE-TYPE TO MTYPE. 
MOVE LOG-RECORD-COGUNT TO REC-CNI. 
MOVE REC-CNT FTO REC-CNI~WA. 
PERFORM FIX-COQUAT UNTIL Y GREATER 4&4. 
MOVE LOG-DATE TO LOATE. 


Figure D-3. Sample Log List Program (Sheet 


CLOSE-DOKN-2. 


3) 


10 


241 
242 
243 
244 
245 
246 
247 
248 
249 
250 
251 

252 
253 
254 
255 
256 
257 
258 
259 
260 
261 
262 
263 
264 
265 
266 
267 
268 
269 
270 
271 

272 

273 
274 
275 
276 
277 
278 
279 
2460 
281 

262 
283 
264 
285 
2u6 
287 
288 
209 
290 
291 

292 
293 
294 
295 
296 
297 
298 
299 
300 


024100 
024200 
024300 
024400 
024500 
024600 
024700 
024800 
024900 
025000 
025100 
025200 
025309 
025400 
025500 
025600 
025700 
025400 
025900 
026000 
026100 
026200 
026300 
026400 
026500 
026600 
026700 
0266800 
026900 
027000 
027100 
027200 
027300 
027400 
027500 
627600 
027700 
027800 
027900 
028000 
626100 
028200 
028300 
028400 
026500 
0286510 
026600 
028700 
026800 
028900 
029000 
029100 
029150 
029200 
029300 
029400 
029500 
029600 
029700 
029600 


= 


* 


PRINT 


MOVE REC-CNT TO REC@CRI-AqW 

MOVE 1 TO I. 

PERFORM FIX-COUAT UNTIL I GREATER THAR 4. 

MOVE REC-CNI-A TO LOGICAL-2. 

WRITE LIST-RECORD FROM LOG-PRINI-3 
BEFORE ADVANCING 1 LIAE. 


PRINT NUMBER OF ERROR LOG ENTRIES 


MOVE ERR-COUNT TO REC-CNT. 

MOVE REC-CNT TO REC-CAT-A. 

MOVE 1 TO I. 

PERFORM FIX-COUNT UNTIL I GREATER THAR 4&. 

MOVE REC-CNT-A 10 COUNT-ERROR. 

WRITE LIST-RECORD FRCM LOG-PRINI-4% 
BEFORE ADVANCING 1 LIAF. 


PRINT NUMBER OF CONTROL LOG ENTRIES 


MOVE CONTROL -COUNT TO REC-CNT. 
MOVE REC-CNT TO REC-CNT~-A. 
MOVE 1 TO 1. 
PERFORM FIX“COUAT UNTIL I GREATER THAN &. 
MOVE REC-CNT-A TO COUNT-~CONFROL. 
WRITE CEIST-RECORO FROM LOG-PRINTI-S 
BEFORE ADVAACING 1 LIAE. 
HOW TMCS WAS TERMIRATED 
If HOW-TERMED EQUAL OFFA 
WRITE LIST-RECORO FROM LOG-PRINT~€E 
BEFORE ADVAKCING 1 LINE 
ELSE 
WRITE LIST*RECORD FROM LOG-PRINT-?7 
BEFURE ADVANCING 1 LINE. 


PRINT LOGICAL RECORD NUMBER OF LAST TERM CCMPRAAD 


MOVE LAST-TERM-REC FO REC-CAT. 

MOVE REC-CNT TO REC-CNIWA. 

MOVE 1 10 I. 

PERFORM FIX-COUNT UNTIL IT GREATER THAN 4. 

MOVE REC-CNTI-A TO TERM-LAST. 

WRITE LIST-RECORD FROM LOG-FRINT~8 
BEFORE ADVANCING 1 LINE. 

AOD 8 TO LINE-COUNT. 


CHG-CHARS. 


IF MSG-ALPHCIT) EQUAL *:" MOVE "A" TC 
IF MSG*ALPHCI) EQUAL *5" MOVE "8" TO 
If MSG-ALPHCT) EQUAL “<" MOVE "C™ TO 
IF MSG"ALPHCTI) EQUAL “=" MOVE *0" TO 
If MSGwALPHCI) EQUAL “%>* MOVE "E™ TO 
IF MSG-~ALPHCI) EQUAL "7" MOVE “F* TO 


ADD 1 TO I. 
MOVE-HDR-FLOS. 


MOVE FLO-MHICI) TC FLO-MHACI). 


ADO 1 TO I. 
FIX-HEADER. 
MOVE 1 TO I. 


PERFORM MOVE*HOR-FLOS 7 TIMES. 


MOVE 1 TO I. 


PERFORM CHG-CHARS UNTIL I GREATER 


‘ MOVE WORK-MTYPE-1 TO WORK-HEADER. 


MOVE LOG-TEXT-1A TO WORK-FREST. 
MOVE WORK@TEXT FO LIEXTI. 


MOVE SPACES TO LUTEXT2. 


FIX-MESSAGE. 
MOVE 1 70 I. 


FSG-ALPHCI). 
WSG-ALPHCI). 
RSG~ALPHCE). 
PSGWALPHCIT). 
rSG-ALPH(1). 
WSGALPHCI). 


THAR 70. 


Figure D-3. Sample Log List Program (Sheet 5) 


018100 
018200 
016300 
0186400 
018500 
018600 
016700 
018800 
016900 
019000 
019100 
019200 
019300 
019400 
019500 
019600 
019700 
0194800 
019900 
020000 
020100 
020200 
020300 
020400 
020500 
020600 
020700 
020500 
020900 
021000 
0211060 
021200 
0214300 
621400 
021500 
021600 
021700 
021600 
021900 
022000 
622100 
022200 
022300 
022400 
022500 
022600 
022709 
022800 
022900 
023000 
023100 
023200 
023309 
023400 
023500 
023600 
023700 
023809 


0239006 


024000 


MOVE LOG-TEME TO LTIME. 
IF MTIYPE EQUAL O CR 2 
MOVE LOG-TEXT-1 TO CTEXTI 
MOVE LOG"TEXT-2 TO LYEXT2. 
IF MTYPE EQUAL 1 
PERFORM FIX-HEADER. 
IF MYTYPE EQUAL 3 
PERFORM FIX-MESSAGE. 
MOVE LOG-TEXT-2 TO LTEXT2. 
WRITE LIST-“RECORD FROM OUT-RECORD-1 
BEFORE AOVANCING 1 LINE. 
ADO 1 TO LINE-COUNT. 
WRITE LIST“RECORD FROM CUI-RECORD-2 
BEFORE ADVANCING 12 LINE. 
ADO 1 TO LINE-COUNT. 
WRITE LIST-RECORD FROM OUT-RECORO-3 
, BEFORE AOVANCING 1 LINE. 
ADD 1 FO LINE-COURT. 
IF CTEXT2 NOT ECUAL SPACES 
MOVE SPACES TO LTEXT2 


WRITE LIST-RECORD FROM OCUT-RECORD-3 


BEFORE ADVANCING 1 LINE 
ADD 1 TO LIAE-COUNT. 
IF LINE-COUNT GREATER 53 
MOVE 5 TO LINE-COUNT 
PERFORM HEADING~ROUTINE. 
GO TO READ-WRITE-LOOP. 


FIX-COUNT. 
IF CNICI) EQUAL "2" MOVE "A" TO CNICI). 
EQUAL “;*" MOVE "8B" FO CNICI). 
IF CNTCI) EQUAL "<" MOVE “"C* TO CNICI). 
IF CNTCIT) EQUAL "=" MOVE "“O" TO CATCI). 
IF CNTCT) EQUAL ">" MOVE "E* TO CANICI). 
EQUAL "7" MOVE “F™ TO CNICI). 


If CNICI) 


If CNTCY) 
ADO 1 TO Tf. 


CHECK-LOG-HEAD. 


IF COG-WRAP EQUAL QFFa 
WRITE LIST“RECORD FROM HAS~RRAPPEC 
BEFURE AOVANCING 12 LINE 
ELSE 


WRITE LIST-RECORD FROK HASNOT-WRAPPED 


BEFORE ADVANCING 1 CINE. 


PRINT THE SIZE OF THE LOG FILE 


MOVE SIZE-OF-LOG TO REC-CNHT. 

MOVE REC-CNT TO REC~CNT~A. 

MOVE 1 T0 I. 

PERFORM FIX~COUAT UNTIL IT GREATER THAR 

MOVE REC~CNT-A TO LOG-SIZEt. 

WRITE LIST-RECORD FROM LOG-PRINI-1 
BEFORE ADVANCING 1 LIANE. 


PRINT THE FIRST LOGICAL RECORD NUMBER 


MOVE FIRST-LOGICAL TO REC-CNI. 

MOVE REC-CNT TO REC-CAT-~A. 

MOVE 1 TO I. 

PERFORM FIX“CCUAT UNTIL IT GREATER THAR 

MOVE REC-CNT-A TO LOGICAL-1. 

WRITE LIST-RECORD FROM LOG-PRINI-2 
BEFORE ADVANCING 1 LINE. 


PRINT LAST LOGICAL RECORD NUMBER 


MOVE LAST-LOGICAL TO REC-CNT. 


Figure D-3. Sample Log List Program (Sheet 4) 


&. 


4. 


301 
302 
303 
304 
305 
306 
307 
308 
309 
310 
311 
312 


029900 
030000 
030100 
030200 
030250 
030300 
030400 
030500 
030600 
030700 
030800 
030900 


MOVE FLDO“MHICTI) TO FLO-MHACI). 
PERFORM CHG-“CHARS UNTIL I GREATER THAA €. 
MOVE WORK@“MTYPE~1 FO WORK-FETCH. 
MOVE FLO“X TO WORK-REMAIN. 
MOVE WORK-MSG TO LTEXT1. 
- MOVE SPACES T0 LTEXT2. 
CLOSE-DOWN. 
CLOSE LOG-IN. 
CLOSE-DUWN~2. 
CLOSE LOG-LIST. 
STOP RUN. 
END-OF -JOB. 


D-11 


e1-d 


| COATROL LOG LISTING 
LOG TYPE MSG TYPE RECORD COUNT DATE TIME 


LOG HAS NOT WRAPPED AROUND 
LOG FILE SIZE = 0200 
FIRST LOGICAL RECORD AT 0037 
LAST LOGICAL RECORD AT 0062 
ERHOR LOG ENTRIES = 00C5 
CONTROL LOG ENTRIES = 005C 
TMCS WAS TERMINATED CRACEFULLY 
LAST TERM COMMAND AT 0062 
02 01 0001 BO/O2/27 15217215 
TEXT: 200000F 000000000000000000000008000%00000000cOOCCOCOCCOCOCCECCOOCCOCOOOOaF RUM TeCS:s £2 GK 22 


02 OL -. 0002 80/02/27 15229243 

TEXT? BOSOSOLONDONDD1L BOON UHOOLODOODOLOOCIOCCOAISOSOICIOOOONOCOCBOCZ2271852542001BI*RN XCANDE U SPO 
02 01 0003 BO/02/27 15:30:03 

TEXT? JOTO34COLODODIHODDDBDO LOD DIDO ZLODIGODOASOZOIOSOOOCOCCOCHOC2271E25S 42001 BAXCANDE FILE TOA3CXD 
02 01 0004 BO/02/27 15:30:06 


TEXT? 200001 20400000000 00000000 09000CODNDDDNDDDDDONCOODDOOOCCOCOOOCCCOCCCOCOCOOAFILE! 


02 01 0005 BO/O02/27 152307309 7 
TEXT? 20000020400001B00000000000900240024C0000000C00CO0COCCOCOOOCCCODCCOCOOLBa2F ROM TMCS? XX 4S/XCANDE FILEL ON 212? 


02 02 0006 BO/C2/27 15230210 
TEXT? ALLOW. INPUT 2? 


02 01 0007 BO/O2/27 15230213 
TEXT: 200001 30400001 BODDDDDDNDDDDDDOCODDNDDDDNDNDDOCONCONCOCCOCODOOOOOOCCOCOCOOATDNBI0XEO 


02 02 0008 80/02/27 15230213 
TEXTS ALLOW.QOUTPUT 77 


02 01 0009 BO/O2/27 15°35:03 
TEXT? 20000190 40000000000000000000000000000000000000000000CACOOOCCCOCCO000000a 


02 02 OOOA BO/02/27 1£235:04 
TEXT: DISALLOW.INPUY ? 


02 02 0008 80/02/27 15:35:05 
TEXT: DISALLOW.INPUT ?? 


“02° 02 OOOC 80/02/27 15:35:07 
TEXT: DISALLOW. QUTPUT 27 


02 OL 0000 BOQ/O02/27 15:35:07 
TEXT? 200000 304N0001B00 00000000 00002B002ZH0C00D00DDDCOOCOOCOOCOCOCOCCCOOCOOODOCIBAZFROK TMCS: 22 STATION 27/10830XC CI-EC 22? 


02 Ol OOOE BO/C2/27 15242254 
TEXT? JOSOSOLOODODO1L HODDOBOODDDOOOOIZOCIZCONA IOI CIOS OONCCOCCC80C2271542530018A*RN CMSCANDE U BAG 


Figure D-4. Sample Output Program 


APPENDIX E 
SAMPLE DC HARDWARE 
CONFIGURATION 


The listings shown in figures E-1, E-2, and E-3 are samples of the entries made during a DC hardware 
configuration. Figure E-1 shows the A, B, and C attachments of the TD830 to line 1; followed by two sites. 
SITE] includes TD730 A at 1800 baud, while SITE2 contains phone number 1234567, including TD830E at 
1800 baud. Figure E-2 shows the attachment of TD830 A to line 1 at 4800 baud and a redefinition of TD830XA 
at an address of Al; then an attachment of B9347XA to line 3. Figure E-3 shows a redefinition of line 0 to 
a direct connect line, followed by an attachment of TD830SB to line 0. 


TMCS 
O1/TMCS BOJ PR IS C 
01/TMCS DISP:; 
FROM TMCS: % CONF LISTED %% 
01/TMCS DISP:; 
DC HARDWARE CONFIGURATION 
DC TD81ABC 
DC END 
01/TMCS DISP: 
START DIRECTORY BUILDER? DC Y OR DC N 


DC Y 
O01/TMCS DISP: 
FROM TMCS: BUILD NEW DIRECTORY?(Y OR N) 


DC Y 
01/TMCS DISP: 
FROM TMCS: ENTER REMOTE SITES 
DC SITE1 TD70A1800 
O01/TMCS DISP: 
FROM TMCS: %% OK %% 
DC SITE2 1234567 TD80E1800 
01/TMCS DISP:; 
FROM TMCS: %% OK %% 
DC END 
O1/TMCS DISP: 
FROM TMCS; CMS TURNKEY MCS (TMCS) 1.0 
O1/TMCS DISP: 
FROM TMCS: LINE 1 NOT READY 


Figure E-1. Attachment of TD830 A, B, and C to Line 1 


E-2 


TMCS 


DC 
DC 


DC 
DC 


DC 


0 
0 


0 


01/TMCS BOJ PR IS C 
O01/JMCS DISP: 
FROM TMCS: %% CONF LISTED %% 
01/TMCS DISP; 
DC HARDWARE CONFIGURATION 
TD8 1A4800 
RS 47/TD830XA ADR="A1" 
O1/TMCS DISP: 
FROM TMCS: %% OK %% 
B933A 
END 
O1/TMCS DISP: 
START DIRECTORY BUILDER? DC Y OR DC N 
N 
O1/TMCS DISP: 
FROM TMCS: CMS TRANSACTION MCS (TMCS) 3.01.05 - 


Figure E-2. Attachment of TD830A to Line 1 at 4800 Baud 


1/TMCS BOS PR IS C 
L/TMCS DPISPs: 

FROM TMCS: £4 CONF LISTED 4z 
1/TMCS DISP: 

DC HARDWARE CONFIGURATION 


PO RL O TYPE=@0082@ MODEM= 2 


0 


bc 1 
DoE 
v 


GDC N 
a) 


L/TMCS DISP: 
FROM TMCS: “2% OK Az 


DSO 
NY 
L/TMCS DISP: 
START DIRECTORY BUILDER? DO Y OR DC N 


1/TMCS DISP: 
FROM TMCS: CMS TRANSACTION MCS (TMCS) 3.01.05 - 


Figure E-3. Redefinition of Line 0 to Direct Connect Line 


800125 


BO00129 


APPENDIX F 
TMCS ERROR MESSAGES 


The following is a list of error messages which may occur during the execution of TMCS. The messages 
are grouped into four sections: 

Command language syntax errors. 

Data communication errors. 

I/O errors. 

TDS annotated message results. 


Command Language Syntax Errors 


Syntax errors are those detected by TMCS and reported back to the originating device indicating that 
the expected format of a command has been violated. The general format of the response is: 


ee ae FROM TMCS:—<error message> S EEEEEEEEEEEEEEEEEEEEEEEeeeieiiiien 


<Fetch Value> 


The <fetch value> can be obtained if the command entered is preceded by a nondisplayable character, such 


as @W@. 


Command Fetch Value Error Message 

AT @300100@ %% LETTER EXPECTED %% 
@300101@ %% | EXPECTED %% 
@300102@ %% QUEUE ALREADY ATTACHED %% 
@300103@ %% QUEUE INVALID OR IN USE %% 
@300104@ %% ALL QUEUES IN USE %% 
@300105S@ %% LETTER OR SPACES EXPECTED %% 
@300106@ %% PROGRAM NAME EXPECTED %% 
@300107@ %% QUEVE NOT ATTACHED %% 
@300108@ %% FILE ID EXPECTED 2% 
@30010A@ %% NO STATIONS AVAILABLE %% 
30010D@ %% INVALID OR MISSING STAID %% 
@300117@ %% PROGRAM NOT RUNNING 2% 
@300118@ %% TMCS TERMINATING %% 

CE @302A0@ %% CC SYNTAX ERR %% 
@302A01@ %% CC SYNTAX ERR %% 
@302A02@ %% ER TERMINATED %% 
@302A03@ %% INVALID FILE NAME %% 
@302A04@ %% INVALID DISK ID OR FILE NAME %% 
@302A0S@ %% INVALID SYNTAX 2% 
@302A06@ %% DSK FILE NOT AVAIL %% 

| @302A07@ %% PREV CC OUTSTANDING %% 

CF @300A01@ %% ALREADY ASSIGNED %% 
@300A02@ %% CF INVALID %% 
@300A03@ %% LPN TOO LARGE %% 
@300A04@ %% LLN TOO LARGE %% 
@300A0S@ %% LSN INVALID %% 
@30A06@ %% NUMBER EXPECTED %% 
@300A07@ %% LETTER EXPECTED %% 
@300A08@ %% <station-name> INVALID 2% 

Cl: @302100@ %% <isn> : <isn> INVALID 2% 
@302101@ %% <iqn> : <Iiqn> INVALID 2% 
@302102@ %% <station-name> : <station-name> INVALID %% 
@302105@ %% SYNTAX ERROR %% 


Command 


CONF 


DI 


DIALIN 


DIALOUT 


DISC 


DT 


EI 


END 
ENQ 


F-2 


Fetch Value 


@300C01@ 
@300C02@ 
@300C03@ 
@300CH@ 
@300C0S@ 
@300C06@ 
@300C07@ 
@300C08@ 
@300CWI@ 


@301700@ 
@301701@ 
@301702@ 
@30170n@ 
@3017FF@ 


@301101@ 
@301101@ 
@2000E1@ 


@301101@ 
@301101@ 
@301101@ 
@301102@ 
@301103@ 
@301104@ 


@301201@ 
@301201@ 
@301201@ 
@301202@ 
@301202@ 
@3012FF@ 


@300501@ 
@300502@ 
@300503@ 
@300504@ 
@300505@ 
@300505@ 
@300505@ 
@300506@ 


@301600@ 
@301601@ 
@301602@ 
@30160n@ 
@3016FF@ 


(See CONF) 


@301X01@ 
@301X02@ 
@301X02@ 
@301X02@ 
@301X03@ 
@301X040@ 
@301X05@ 
@301X05S@ 
@301X0S@ 
@301X06@ 
@301X07@ 
@301X09@ 


(X may be E or F) 


Error Message 


%% SYNTAX ERROR %% 

%% <speed> INVALID SPEED %% 

%% <station-name> INVALID %% 

%% STATION TYPE <type-mnemonic> 152 NON-EXISTENT %% 
%% INVALID 2% 

%% INVALID LSN %% 

%% NOT CONTROLLING FUNCTION %% 

2% INVALID LLN 2% 

R%% ERROR-LINES READY 2% 

%% SITE DIRECTORY CONTAINS ERROR %% 

%% PHONE DIRECTORY CONTAINS ERRORS %% 
%% INCONSISTENT LINE NUMBER %% 

%% <phone-no.> NOT A VALID PHONE NUMBER %% 
%% ILLEGAL SITE ID 4% 

R% <site-name> NOT DELETED-NOT FOUND %% 

%% <station-name> ATTACHED TO LINE <lIln> 2% 


%% DENIED-NOT CF %% 

%% STATION ILLEGAL DI INVALID %% 

%% STATION <Isn>/<station-name> DI INVALID %% 
RY <item> DI INVALID %% 

%le REQUEST DENIED 2% 


%% INVALID %% 
%% DENIED-NOT CF %% 
%% CANNOT RECONFIGURE-LINE IN USE %% 


%% <item> INVALID DIAL %% 

%% DENIED-NOT CF %% 

%% DENIED-LINE IN DIRECTORY %% 
%% LINE BUSY %% 

%% LINE DIALED-IN %% 

%% DISC PENDING %% 


%% <number> NOT A VALID SITE ID %% 
%% <iin> NOT A VALID LINE NUMBER %% 
%% NOT CF OR DIALED OUT %% 

%% LINE <iin> NOT CONNECTED %% 

%% <site-name> NOT CONNECTED %% 

%?% REQUEST DENIED 2% 


R% LETTER EXPECTED %% 

%% | EXPECTED %% 

R%% INVALID OR MISSING STAID 2% 

%% <item> INVALID QUEUE %% 

%% STATION <Isn>/<station-name> NOT ATTACHED 2% 
Fo% SPO NOT ATTACHED 2% 

%% NOT ATTACHED 2% 

%% NO STATIONS ATTACHED 2% 


R% DENIED NOT CF 2% 

%% STATION ILLEGAL EI INVALID %% 

%% STATION <Isn>/<station-name> EI INVALID 2% 
%% <item> EI INVALID 2% 

%% REQUEST DENIED %% 


%% UNKNOWN QACTION %% 

%% STATION <Isn>/<station-name> INVALID %% 
%% TASK <mix>/<program-name> INVALID %% 
%% QUEVE <Iqn>/<queue-name> INVALID %% 
%% NUMBER EXPECTED %% 

%% | EXPECTED 2% 

%% LSN <Isn> TOO LARGE %% 

%% MIX <mix> TOO LARGE 2% 

%% LON <Iqn> TOO LARGE 2% 

Fo%o UNKNOWN QTYPE %% 

%% LETTER EXPECTED %% 

%% QUEUE REF INVALID 2% 


Command 
EX 


GT 


LC 


LL 


LO 
LT 
MX 


NT 


NY 


OL 


PL 
PR 


RD 


Fetch Value 
@300X00@ 
@300X01@ 
@300X02@ 
@300X03@ 
@300X4K@ 
@300X05@ 
@300X06@ 
@300X08@ 
@300X09@ 
@30X0A@ 
@30X0D@ 
@300X15@ 
@300X16@ 
@300X 18@ 
@300019@ 


(X may be 1, 2, 3, or 4) 


@300801@ 
@300802@ 
@300803@ 
@300804@ 
@300805@ 
@300806@ 
@300807@ 
@300808@ 
@300809@ 


@302401@ 
@302402@ 
@302403@ 
@302404@ 


@302301@ 
@302302@ 
@302303@ 
@302304@ 
@3023FF@ 


@3028FF@ 
@3025FF@ 


@300600@ 
@300600@ 
@300601@ 


@300901@ 
@3I00OMN2@ 
@30003 @ 
@300904@ 
@300905@ 
@30096@ 
@300907 @ 
@30098@ 


@301500@ 
@301501@ 
@301502@ 
@301503@ 
@30150n@ 
@301SFF@ 


@301IW1@ 
@30190@ 
@301902@ 


(See EX) 


@300701@ 
@300702@ 
@300703@ 
@30074@ 
@300705@ 
@'300706@ 
@30101@ 
@302002@ 
@301003@ 


Vo%e 
%e% 
%eo% 


Error Message 


LETTER EXPECTED %% 
/ EXPECTED %% 
QUEUE ALREADY ATTACHED %% 


%% QUEUE INVALID OR IN USE %% 


%%o 
Vo% 
%o% 
%e% 
oo 
FeV 
Yoo 
oP 
%o%o 
ToV%o 
Fe% 


Leo 
Foo 
%o% 
%o% 
%o% 
%e% 
Vo% 
%oV% 
%oPo 


Fo%o 
%o% 
Vo% 
Ve% 


%% 
eGo 
%o% 
YoPe 
%% 


%o% 
%o%e 


o% 
TeV 
VQ 


%% 
Foo 
%% 
To% 
Fo%o 
%o% 
%o% 
Fo%o 


Fe%o 
Vo% 
%e%o 
Fo%o 
%o% 
Jo%o 


%oVe 
Fo% 
FoR 


%o% 
%o%o 
%% 
FoVo 
%% 
%o% 


%oVe 
Feo 
FoVo 


ALL QUEUES IN USE 2% 
LETTER OR SPACE EXPECTED %% 
PROGRAM NAME EXPECTED %% 
FILE ID EXPECTED %% 

ALL MX-S IN USE %% 

NO STATIONS AVAILABLE %% 
INVALID OR MISSING STAID %% 
MULTIPLE TASKS %% 

ALL CQ-S IN USE %% 

TMCS TERMINATING %% 

DT-ED %% 


SYNTAX ERROR %% 

INVALID LSN %% 

INVALID LON %% 

INVALID QUEUE NAME %% 

INVALID STATION NAME %% 

INVALID PROGRAM NAME %% 
INVALID MIX NUMBER %% 

LINE PRINTER NOT AVAILABLE %% 
TALLY/TOGGLE CHANGE PENDING %% 


INVALID LOG TYPE %% 

EVLOG OPTION NOT SET %% 
ERLOG OPTION NOT SET %% 
EOLOG OPTION NOT SET %% 


INVALID LOG TYPE %% 
RANGE INVALID 2% 
SYNTAX ERROR %% 
EVENT LOG NOT OPEN %% 
REQUEST DENIED %% 


REQUEST DENIED %% 
REQUEST DENIED %% 


<mix>/<program-name> MX INVALID %% 
SYNTAX ERROR %% 
INVALID DC MX# %% 


SYNTAX ERROR %% 

INVALID LSN %% 

INVALID LQN %% 

INVALID QUEUE NAME %% 

INVALID STATION NAME %% 

INVALID PROGRAM NAME %% 
INVALID MIX NUMBER %% 
TALLY/TOGGLE CHANGE PENDING %% 


DENIED-NOT CF %% 

LINE <lIIn> NY INVALID %% 

STATION ILLEGAL NY INVALID 2% 

STATION <lIsn>/<station-name> NY INVALID %% 
STATION <item> NY INVALID 2% 

REQUEST DENIED %% 


OL WHAT %% 
SYNTAX ERROR %% 
NOT APPLICABLE ON B80 %% 


SYNTAX ERROR %% 
<mix>/<program-name> INVALID %% 
<isn>/<station-name> INVALID %% 
PRIORITY CLASS INVALID 2% 
INVALID 2% 

PR NOT IMPLEMENTED ON B80 %% 


SYNTAX ERROR %% 
INVALID-NOT CONTROLLING FUNCTION %% 
NOT APPLICABLE ON B80 %% 


F-3 


Command 


RE 


RL 


RN 


RO 


RS 


RY 


SET 


SO 
STOPTEST 


TERM 
TEST 


F4 


Fetch Value 


@302002@ 
@302002@ 
@30202@ 
@302003@ 
@302003@ 
@302003@ 
@302003@ 
@302003@ 
@302003@ 
@302005@ 
@302005@ 
@302005@ 
@302005@ 
@302006@ 


@300E01@ 
@300E02@ 


@300EFF@ 


(See EX) 


@302701@ 
@3027FF@ 


@300F01@ 
@300F02@ 
@300F03@ 
@300FH@ 
@30FUS@ 
@300F06@ 
@300F07@ 
@300F0B@ 
@300F09@ 
@300F0A@ 


@301400@ 
@301401@ 
@301402@ 
@301403@ 
@30140n@ 
@3014FF@ 


@302X0@ 
@301X01@ 
@301X02@ 
@301X02@ 
@301X02@ 
@301X03@ 
@301X04@ 
@301X05@ 
@301X05@ 
@301X05@ 
@301X06@ 
@301X07@ 
@301XFF@ 


(X may be D, E, 


@302601@ 
@3026FF@ 


@301902@ 
@301903@ 


@3022FF@ 


@301A01@ 
@301A02@ 
@301A20@ 
@301A21@ 
@301A22@ 
@301AFF@ 


or F) 


Error Message 


%% QUEVE <Iqn>/<queue-name> RE INVALID %% 
%% SOURCE <item> RE INVALID %% 

%% DESTINATION <item> RC INVALID 4% 
%% SOURCE <Isn> EXPECTED %% 

%% SOURCE <iqn> EXPECTED %% 

%% SOURCE LETTER EXPECTED %% 

%% DESTINATION <Isn> EXPECTED %% 
%% DESTINATION <Iqn> EXPECTED %% 
%% DESTINATION LETTER EXPECTED 2% 
%% SOURCE <Isn> TOO LARGE %% 

%% SOURCE <Iqn> TOO LARGE %% 

%% DESTINATION <Isn> TOO LARGE %% 
%% DESTINATION <Iqn> TOO LARGE 2% 


%% STATION <Isn>/<station-name> NOT ATTACHED %% 


%% SYNTAX ERROR %% 
%% INVALID STRING %% 
%% REQUEST DENIED %% 


7% 
%o% 


Fo% 
Toe 
%% 
Teo 
To% 
FoF 
%o% 
Jo% 
To%e 
Ve% 


VeVe 
Zo% 
To% 
Fo% 
Ve% 
LV 
Fo% 
%oV% 
%o% 
Fo%o 
To% 
TeV 
To% 
%% 
%e% 
FoVe 
We% 
Yo%e 


FeV 
Jo% 


FoVo 
Yoo 


TeV 


%o% 
%o%o 
Yo% 
Too 
Do% 
%o% 


INVALID MCS OPTION %% 
REQUEST DENIED %% 


SYNTAX ERROR %% 

LSN INVALID 2% 

INVALID STATION NAME 2% 
INCOMPLETE 4% 

INVALID FIELD %% 

MISSING EQUAL SIGN %% 

A NUMBER EXPECTED %% 

ONE (1) OR ZERO (0) EXPECTED %% 
INVALID STRING %% 

NOT CHANGED-NOT ON A LINE 2% 


DENIED-NOT CF %% 

LINE <lin> RY INVALID 2% 

STATION ILLEGAL RY INVALID %% 

STATION <Isn>/<station-name> RY INVALID %% 
STATION <item> RY INVALID %% 

REQUEST DENIED %% 


LIMIT INVALID 2% 

UNKNOWN QACTION %% 

STATION <Isn>/<station-name> INVALID %% 
TASK <mix>/<program-name> INVALID %% 
QUEUE <lIqn>/<queue-name> INVALID 4% 
NUMBER EXPECTED %% 

/ EXPECTED 2% 

<Iisn> TOO LARGE %% 

<mix> TOO LARGE %% 

<Iqn> TOO LARGE %% 

UNKNOWN QTYPE %% 

LETTER EXPECTED %% 

REQUEST DENIED 2% 


INVALID MCS OPTION %% 
REQUEST DENIED %% 


SYNTAX ERROR %% 
INVALID OR MISSING STATION %% 


REQUEST DENIED %% 


BURST NUMBER REQUIRED %% 
WRAP NUMBER REQUIRED %% 
SYNTAX ERR # <error-number> %% 
LOGICAL ERR # <error-number> %% 
DC SYS ERR # <error-number> %% 
REQUEST DENIED 2% 


Command Fetch Value Error Message 


TO @301700@ %% UNABLE TO SWITCH %% 
@301701@ %% SYNTAX ERROR %% 
@301702@ %% SYNTAX ERROR %% 
@301720@ R%% SPO NOT ATCHD &%% 
@301721@ %% TSK NOT ATCHD %% 

WMI @301001@ %% NUMBER EXPECTED 2% 
@301002@ %% LSN TOO LARGE %% 
@301003@ %% LON TOO LARGE 2% 
@301004@ %% MIX TOO LARGE %% 
@301005@ %7 WMI INVALID 2% 
@30106@ %% <item> INVALID %% 

WRU None 

ZIP @301B01@ %% ZIP FAILED %% 


DATA COMMUNICATION ERRORS 


Data communication errors are detected by the TMCS either internally or through communication with 


the data comm subsystem. These errors are reported in the same general format as the command language 
syntax errors. Error messages are: 


Fetch Value Error Message 

@2000C8@ %Y% DC ERR: BAD MSG TYPE %% 

@2000CI@ %% DC ERR: BAD STATION NO %% 

@200CA@ %% DC ERR: BAD QUEUE REF %% 

@2000CB@ %% DC ERR: BAD SUBNET NO %% 

@2000CC@ %% DC ERR: TEXT SIZE TOO BIG 2% 

@2000CD@ %% DC ERR: NULL MREF %% 

@200CE@ %% DC ERR: BYTE INDEX TOO BIG %% 

@2000CF@ %% DC ERR: BAD TASK NO %% 

@2000D0@ %% DC ERR: BAD LINE NO 2% 

@2000D1@ %% DC ERR: BAD MODEM NO &2% 

@2000D2@ %% DC ERR: BAD TERMINAL NO %% 

@2000D3@ %% DC ERR: NO SPACE %% 

@2000D4@ %% DC ERR: STATION NOT ATTACHED %% 
@2000D5@ %% DC ERR: COMM NOT IMPLEMENTED 2% 
@200D6@ %% DC ERR: LIMIT NOT ALLOWED %% 

@2000DC@ %% DC ERR: STATION ALREADY ATTACHED %% 
@2000DD@ %% DC ERR: ATTRIBUTE MISMATCH %% 

@2000DE@ %% DC ERR: DIRECT CONNECT LINE %% 

@200DF@ %% DC ERR: FULL DUPLEX MISMATCH %% 
@200E0@ %% DC ERR: INCOMPLETE VARIABLE 2% 

@2000E 1@ %% DC ERR: IMPROPER LINE CONDITION 2% 
@2000E2@ %% DC ERR: MESSAGES QUEVED %% 

@2000E3@ %% DC ERR: NO VACANCY ON LINE &% 

@2000E4@ %% DC ERR: SPEED MISMATCH %% 

@2000F9@ %% DC LOAD FAILURE BAD NDL PRIORITY CLASS %% 
@2000FA@ %% DC LOAD FAILURE DISK ERROR %% 

@2000FB@ %% DC LOAD FAILURE NDL DATA ERROR 2% 
@200FC@ %% DC LOAD FAILURE INSUFFICIENT MEMORY %% 
@2000FD@ %% DC LOAD FAILURE CANNOT CLOSE NDL FILE %% 
@2000FE@ %% DC LOAD FAILURE CANNOT OPEN NDL FILE %% 
@20010E@ %% DC ERROR 7PM PARITY DC* XXXX %% 

@20010F@ %% DC ERROR SPM PARITY DC* XXXX %% 

@200110@ %% DC ERROR PROCESSOR NUMBER INVALID %% 
@200111@ %% DC ERROR PROCESSOR BUSY %% 

@200112@ %% DC ERROR PROGRAM FILE NAME INVALID %% 
@200117@ %% DC LOAD FAILURE DE* SPM PARITY ERROR %% 
@200118@ %% DC LOAD FAILURE DC* 7PM PARITY ERROR %% 
@200119@ %% DC LOAD FAILURE DC* NO RESPONSE %% 
@20011A@ %% DC LOAD FAILURE CANNOT CLOSE DCP FILE %% 
@20011B@ %% DC LOAD FAILURE CANNOT OPEN DCP FILE %% 
@20011C@ %% DC LOAD FAILURE DC* NOT ON SYSTEM %% 


/O ERRORS 


I/O errors are reported to TMCS by the operating system. These errors are also reported in the same 
format as the command language syntax errors and data comm errors. 


Fetch Value Error Message 
@20100@ %% 10 ERR: EOF ON SEQUENTIAL FILE 2% 
@202010@ %% 10 ERR: SEQUENCE ERROR ON OUTPUT TO INDEXED FILE %% 
@202020@ %% 10 ERR: DUPLICATE KEY ON INDEXED FILE %% 
@200030@ %% 10 ERR: NO SUCH RECORD %% 
@203010@ %% 10 ERR: READ ERROR ON DATA FILE %% 
@203020@ %% 1O ERR: WRITE ERROR ON DATA FILE %% 
@203030@ %% 1O ERR: READ ERROR ON KEY FILE %% 
@203040@ %% JO ERR: WRITE ERROR ON KEY FILE %% 
@204000@ %% 10 ERR: BOUNDARY VIOLATION %% 

ZIP ERRORS 


Zip errors are reported to TMCS by the operating system. These errors are also reported in the same 
format as the command language syntax errors, data comm errors, and I/O errors. Values and their messages 
are: 


Fetch Value Error Message 

@20X000@ %% NOT IMPLEMENTED OR UNKNOWN ERROR %% 
@200010@ %% PROGRAM NOT FOUND %% 
@200020@ %% INTERPRETER NOT FOUND %% 
@200030@ %7o INSUFFICIENT MEMORY %% 
@200040@ %% NO USER DISK %% 

@200050@ %o% FULL MIX %% 

@200060@ %% USER COUNT ERROR %% 
@200070@ %% DUPLICATE PACK %% 

@200080@ %% INVALID LOAD REQUEST %% 
@'200090@ %% MCS ALREADY PRESENT %% 
@2000A0@ %% DISK ERROR %% 

@2000B0@ %% CODE FILE ERROR %% 

@200C0@ %% ILLEGAL DATACOM REQUEST %% 


ANNOTATED MESSAGE RESULTS 


Certain fetch values returned by TMCS contain message result values in byte 3. The following 1s a list 
of those values. 


Result Message 

01 LINE <lln> NOT READY 

02 STATION <Isn>/<station-name> NOT READY 
06 STATION <Isn>/<station-name> NOT ATTACHED 
07 STATION <Isn>/<station-name> DI INVALID 
07 STATION <Isn>/<station-name> E] INVALID 
07 STATION <Isn>/<station-name> NY INVALID 
07 STATION <Isn>/<station-name> RY INVALID 
07 LINE <lIn> NY INVALID 

07 LINE <lIn> RY INVALID 

07 LINE <lin> DIAL INVALID 

08 INVALID NEFWORK REQUEST 

09 DC HARDWARE ERROR 

10 LINE <lIn> DIALIN RECEIVED 


F-6 


APPENDIX G 


TMCS COMMAND RESPONSES 


The responses to commands detailed in the following list are those which can be expected during normal 
execution of TMCS. The general format of the response is: 


i a FROM TMCS:—<response> —_ 


<fetch value> 


The <fetch value> can be obtained if the command entered is preceded by some non-displayable char- 
acter, such as @00@. 


Command 


AT 
CC 
CF 


CL 
CONF 


DI 


DIALIN 
DIALOUT 


DISC 


DT 


EI 
ENQ 
EX 


GT 
LC 
LL 
LO 
LT 
MX 
NT 
NY 


OL 
PL 
PR 
RD 
RE 


Fetch Value 
@00010C@ 
@002 A00@ 


@00AN@ 
@0@ 


@002104@ 


@000CH@ 
@00CHW@ 


@001700@ 
@0@ 


@001100@ 


@001100@ 
@W@ 
@001200@ 
@W@ 
@W@ 


@000500@ 
@000500@ 
@000500@ 
@000500@ 


@001600@ 
@0@ 


@001X00@ 
(X=E or F) 


@000X0C@ 
(X=1 or 2) 


@000800@ 
@002400@ 
@002300@ 
@002800@ 
@002500@ 
@000600@ 
@000900@ 


@001500@ 
@0@ 
@0@ 


@001900@ 
@00040C@ 
@000700@ 
@001000@ 
@002000@ 


Response 
%% <mix>/<program-name> <q-name> OK%% 
%% CC OK 4% 


%% CF OK %% (see note 1) 
%% <annotated message result> %% (see note 2) 


%% OK %% 


%% OK %% (see note 1) 
%% <site-id> DELETED %% (see note 1) 


%% OK %% (see note 1) 
STATION <Isn>/<station-name> DISABLED (see note 2) 


<site-name> CONFIGURED ON LINE <lln> 


%% DIAL OK %% (see note 1) 
LINE <lln> DIALOUT SUCCESSFUL (see note 2) 


%% DISC OK %% 
LINE <lIn> NOT READY (see note 2) 
<site-name> ON LINE# <lin> HAS BEEN DISCONNECTED 


%% SPO DT-ED %% 

F% TASK <mix>/<program-name> DT-ED %% 
%% STATION <Isn>/<station-name> DT-ED %% 
%o% DT OK %% 


%% OK %% (see note 1) 
STATION <Isn>/<station-name> ENABLED (see note 2) 


See Section 3 for response 
%% <mix>/<program-name> (q-name> OK %% 


%% OK %% (see note 1) 
%% OK %% (see note 1) 
%% LL COMPLETED %% (see note 1) 
See Section 3 for response 
%% LT COMPLETED %% (see note 1) 
See Section 3 for response 
%% OK %% (see note 1) 


%% OK %% (see note 1) 
LINE <lIlIn> NOT READY (see note 2) 
STATION <lIsn>/<station-name> NOT READY (see note 2) 


See Section 3 for response 
%% <mix> /<program-name> <q-name> OK %% 
%% OK %% (see note 1) 
%% OK %% (see note 1) 
See Section 3 for response 


Command Fetch Value Response 
RL @0NENM@ To% OK %% (see note 1) 
RN @00030C@ RY <mix>/<prog-name> <q-name> OK %% 
RO @002700@ %% OK %% (see note 1) 
RS @000FW@ %% OK %% (see note 1) 
RY @001400@ 7% OK H% (see note 1) 
@W@ LINE <Iln> READY (see note 2) 
@W0@ STATION <Isn>/<station-name> READY (see note 2) 
SET @001X0B@ %% OK %% (see note 1) 
(X=D,E,or F) 
SO @002600@ %% OK %% (see note 1) 
STOPTEST @00190@ %% STOPTEST OK %% 
TERM @002200@ TMCS TERMINATING 
TEST @001A00@ %% TEST OK %% (see note 1) 
TO @001700@ %e% OK %% (see note 1) 
WMI @001C00@ YOU ARE SPO 
@001CW@ YOU ARE STATION <Isn>/<statin-name> 
@001C00@ YOU ARE QUEUE <Iqn>/<q-name> 
@W01C0@ YOU ARE <mix>/<program-name> <q-name> 
WRU @002900@ CMS TRANSACTION MCS (TMS) <rel. level> 
ZIP @001B00@ %% OK B% (see note 1) 
@OXXXX@ ZIPPED PROGRAM COMPLETE 


NOTES 
1. Immediate response on CQ; FROM TMCS does not appear in internal format. 


2. Delayed response on TQ; FROM TMCS replaced by @00@ <35-byte message header> in internal 
format. 
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